/ BBS in a Box 9 / AMUG BBS in a Box Volume IX (August 1993) (MacWizards).iso / Files / Prog / S / ShowOff.cpt / ShowOff 7-2.pas

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 92 26 00 01 47 7b 2a 2a | 2a 20 54 48 49 53 20 49 |.&..G{**|* THIS I|
|00000010| 53 20 54 48 45 20 43 4f | 4e 56 45 52 53 49 4f 4e |S THE CO|NVERSION|
|00000020| 20 4f 46 20 4c 49 53 54 | 49 4e 47 20 37 2d 32 20 | OF LIST|ING 7-2 |
|00000030| 4f 46 20 22 48 4f 57 20 | 54 4f 20 57 52 49 54 45 |OF "HOW |TO WRITE|
|00000040| 20 4d 41 43 49 4e 54 4f | 53 48 20 7d 92 26 00 01 | MACINTO|SH }.&..|
|00000050| 46 7b 2a 2a 2a 20 53 4f | 46 54 57 41 52 45 22 2e |F{*** SO|FTWARE".|
|00000060| 20 20 54 48 49 53 20 56 | 45 52 53 49 4f 4e 20 48 |  THIS V|ERSION H|
|00000070| 41 53 20 41 4c 4c 20 54 | 48 45 20 43 4f 4e 56 45 |AS ALL T|HE CONVE|
|00000080| 52 53 49 4f 4e 53 20 46 | 4f 52 20 4c 49 47 48 54 |RSIONS F|OR LIGHT|
|00000090| 53 50 45 45 44 20 7d 00 | 92 1e 00 01 37 7b 2a 2a |SPEED }.|....7{**|
|000000a0| 2a 20 50 41 53 43 41 4c | 20 41 4e 44 20 3d 3d 20 |* PASCAL| AND == |
|000000b0| 48 41 53 20 48 41 44 20 | 54 48 45 20 4b 4e 4f 57 |HAS HAD |THE KNOW|
|000000c0| 4e 20 42 55 47 53 20 43 | 4f 52 52 45 43 54 45 44 |N BUGS C|ORRECTED|
|000000d0| 20 3d 3d 7d 94 01 92 20 | 00 01 3a 7b 3d 3d 3d 3d | ==}... |..:{====|
|000000e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000100| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000110| 3d 3d 3d 3d 7d 70 92 28 | 00 01 4a 7b 20 20 20 20 |====}p.(|..J{    |
|00000120| 20 20 20 20 20 20 20 20 | 20 20 20 20 3d 3d 3d 20 |        |    === |
|00000130| 49 6e 73 74 72 75 63 74 | 69 6f 6e 73 20 46 6f 72 |Instruct|ions For|
|00000140| 20 52 75 6e 6e 69 6e 67 | 20 55 6e 64 65 72 20 4c | Running| Under L|
|00000150| 69 67 68 74 53 70 65 65 | 64 20 50 61 73 63 61 6c |ightSpee|d Pascal|
|00000160| 20 3d 3d 3d 7d 04 94 01 | 92 1c 00 01 33 7b 20 20 | ===}...|....3{  |
|00000170| 31 29 20 53 65 6c 65 63 | 74 20 27 4e 45 57 20 50 |1) Selec|t 'NEW P|
|00000180| 52 4f 4a 45 43 54 27 20 | 66 72 6f 6d 20 74 68 65 |ROJECT' |from the|
|00000190| 20 27 50 52 4f 4a 45 43 | 54 20 6d 65 6e 75 2e 7d | 'PROJEC|T menu.}|
|000001a0| 92 2c 00 01 53 7b 20 20 | 32 29 20 41 64 64 20 74 |.,..S{  |2) Add t|
|000001b0| 68 69 73 20 66 69 6c 65 | 20 74 6f 20 74 68 65 20 |his file| to the |
|000001c0| 70 72 6f 6a 65 63 74 20 | 75 73 69 6e 67 20 74 68 |project |using th|
|000001d0| 65 20 27 41 44 44 20 46 | 49 4c 45 27 20 73 65 6c |e 'ADD F|ILE' sel|
|000001e0| 65 63 74 69 6f 6e 20 75 | 6e 64 65 72 20 27 50 52 |ection u|nder 'PR|
|000001f0| 4f 4a 45 43 54 27 2e 7d | 92 29 00 01 4d 7b 20 20 |OJECT'.}|.)..M{  |
|00000200| 33 29 20 43 68 6f 6f 73 | 65 20 74 68 65 20 27 52 |3) Choos|e the 'R|
|00000210| 55 4e 20 4f 50 54 49 4f | 4e 53 27 20 75 6e 64 65 |UN OPTIO|NS' unde|
|00000220| 72 20 27 50 52 4f 4a 45 | 43 54 27 20 61 6e 64 20 |r 'PROJE|CT' and |
|00000230| 70 69 63 6b 20 27 75 73 | 65 20 72 65 73 6f 75 72 |pick 'us|e resour|
|00000240| 63 65 20 66 69 6c 65 27 | 2e 7d 92 27 00 01 49 7b |ce file'|.}.'..I{|
|00000250| 20 20 20 20 20 20 20 50 | 69 63 6b 20 74 68 65 20 |       P|ick the |
|00000260| 72 65 73 6f 75 72 63 65 | 20 66 69 6c 65 20 27 53 |resource| file 'S|
|00000270| 68 6f 77 4f 66 66 20 37 | 2d 32 2e 52 73 72 73 27 |howOff 7|-2.Rsrs'|
|00000280| 20 66 6f 72 20 75 73 65 | 20 77 68 65 6e 20 63 6f | for use| when co|
|00000290| 6d 70 69 6c 69 6e 67 7d | 94 01 92 1d 00 01 35 7b |mpiling}|......5{|
|000002a0| 54 68 61 74 27 73 20 61 | 6c 6c 20 74 68 65 72 65 |That's a|ll there|
|000002b0| 20 69 73 20 74 6f 20 67 | 65 74 74 69 6e 67 20 69 | is to g|etting i|
|000002c0| 74 20 74 6f 20 72 75 6e | 2c 20 68 61 76 65 20 66 |t to run|, have f|
|000002d0| 75 6e 2e 7d 92 20 00 01 | 3a 7b 3d 3d 3d 3d 3d 3d |un.}. ..|:{======|
|000002e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000002f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000300| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000310| 3d 3d 7d 72 94 01 94 01 | 92 2f 00 01 59 7b 54 68 |==}r....|./..Y{Th|
|00000320| 69 73 20 69 73 20 74 68 | 65 20 64 65 62 75 67 67 |is is th|e debugg|
|00000330| 69 6e 67 20 65 78 65 72 | 63 69 73 65 20 70 72 6f |ing exer|cise pro|
|00000340| 67 72 61 6d 20 22 53 48 | 4f 57 4f 46 46 22 20 66 |gram "SH|OWOFF" f|
|00000350| 72 6f 6d 20 22 48 6f 77 | 20 74 6f 20 57 72 69 74 |rom "How| to Writ|
|00000360| 65 20 4d 61 63 69 6e 74 | 6f 73 68 20 53 6f 66 74 |e Macint|osh Soft|
|00000370| 77 61 72 65 22 7d 92 0c | 00 01 13 7b 42 79 3a 20 |ware"}..|...{By: |
|00000380| 53 63 6f 74 74 20 4b 6e | 61 73 74 65 72 7d 94 01 |Scott Kn|aster}..|
|00000390| 92 20 00 01 3a 7b 54 68 | 69 73 20 76 65 72 73 69 |. ..:{Th|is versi|
|000003a0| 6f 6e 20 69 73 20 63 6f | 6e 66 69 67 75 72 65 64 |on is co|nfigured|
|000003b0| 20 74 6f 20 72 75 6e 20 | 77 69 74 68 20 4c 69 67 | to run |with Lig|
|000003c0| 68 74 53 70 65 65 64 20 | 50 61 73 63 61 6c 7d 6e |htSpeed |Pascal}n|
|000003d0| 92 28 00 01 4b 7b 45 6e | 74 65 72 65 64 20 61 6e |.(..K{En|tered an|
|000003e0| 64 20 6d 6f 64 69 66 69 | 65 64 20 62 79 20 53 74 |d modifi|ed by St|
|000003f0| 65 70 68 65 6e 20 53 63 | 61 6e 64 61 6c 69 73 20 |ephen Sc|andalis |
|00000400| 2d 20 53 75 6e 6e 79 76 | 61 6c 65 20 43 41 20 2d |- Sunnyv|ale CA -|
|00000410| 20 4d 61 72 63 68 20 31 | 35 2c 20 31 39 38 37 7d | March 1|5, 1987}|
|00000420| 94 01 92 2b 00 01 51 7b | 49 6e 20 6f 72 64 65 72 |...+..Q{|In order|
|00000430| 20 74 6f 20 6d 61 6b 65 | 20 74 68 65 20 70 72 6f | to make| the pro|
|00000440| 67 72 61 6d 20 77 6f 72 | 6b 20 75 6e 64 65 72 20 |gram wor|k under |
|00000450| 74 68 65 20 4c 69 67 68 | 74 53 70 65 65 64 20 50 |the Ligh|tSpeed P|
|00000460| 61 73 63 61 6c 20 63 6f | 6d 70 69 6c 65 72 2c 20 |ascal co|mpiler, |
|00000470| 73 65 76 65 72 61 6c 7d | 92 2a 00 01 4e 7b 6c 69 |several}|.*..N{li|
|00000480| 6e 65 73 20 6f 66 20 63 | 6f 64 65 20 68 61 76 65 |nes of c|ode have|
|00000490| 20 62 65 65 6e 20 6d 6f | 64 69 66 69 65 64 20 77 | been mo|dified w|
|000004a0| 69 74 68 20 61 20 70 72 | 6f 67 72 61 6d 6d 69 6e |ith a pr|ogrammin|
|000004b0| 67 20 73 74 79 6c 65 20 | 63 61 6c 6c 65 64 20 27 |g style |called '|
|000004c0| 63 6f 65 72 63 69 6f 6e | 27 2e 7d 61 92 29 00 01 |coercion|'.}a.)..|
|000004d0| 4d 7b 27 43 6f 65 72 63 | 69 6f 6e 27 20 6d 61 6b |M{'Coerc|ion' mak|
|000004e0| 65 73 20 50 61 73 63 61 | 6c 20 61 63 63 65 70 74 |es Pasca|l accept|
|000004f0| 20 69 6e 63 6f 6d 70 61 | 74 69 62 6c 65 20 27 74 | incompa|tible 't|
|00000500| 79 70 65 73 27 20 69 6e | 20 61 20 72 6f 75 6e 64 |ypes' in| a round|
|00000510| 61 62 6f 75 74 20 6d 61 | 6e 6e 65 72 2e 7d 92 2c |about ma|nner.}.,|
|00000520| 00 01 52 7b 46 6f 72 20 | 6d 6f 73 74 20 63 6f 6e |..R{For |most con|
|00000530| 76 65 72 69 73 6f 6e 73 | 20 49 20 68 61 76 65 20 |verisons| I have |
|00000540| 74 72 69 65 64 20 74 6f | 20 69 6e 63 6c 75 64 65 |tried to| include|
|00000550| 20 74 68 65 20 6f 72 69 | 67 69 6e 61 6c 20 63 6f | the ori|ginal co|
|00000560| 64 65 2c 20 63 6f 6d 6d | 65 6e 74 65 64 20 6f 75 |de, comm|ented ou|
|00000570| 74 20 6f 66 7d 63 92 2e | 00 01 56 7b 74 68 65 20 |t of}c..|..V{the |
|00000580| 63 6f 64 65 2c 20 61 73 | 20 77 65 6c 6c 20 61 73 |code, as| well as|
|00000590| 20 61 20 63 6f 6d 6d 65 | 6e 74 20 70 6f 69 6e 74 | a comme|nt point|
|000005a0| 69 6e 67 20 6f 75 74 20 | 74 68 65 20 27 63 6f 65 |ing out |the 'coe|
|000005b0| 72 63 65 64 27 20 73 74 | 61 74 65 6d 65 6e 74 73 |rced' st|atements|
|000005c0| 2e 20 20 49 6e 20 74 68 | 65 20 65 76 65 6e 74 20 |.  In th|e event |
|000005d0| 7d 6e 92 30 00 01 5a 7b | 74 68 61 74 20 61 20 6c |}n.0..Z{|that a l|
|000005e0| 69 6e 65 20 68 61 73 20 | 6e 6f 74 20 62 65 65 6e |ine has |not been|
|000005f0| 20 70 6f 69 6e 74 65 64 | 20 6f 75 74 20 69 6e 20 | pointed| out in |
|00000600| 74 68 69 73 20 63 6f 6e | 76 65 72 73 69 6f 6e 2c |this con|version,|
|00000610| 20 61 20 63 61 72 65 66 | 75 6c 20 6c 6f 6f 6b 20 | a caref|ul look |
|00000620| 61 74 20 74 68 65 20 6f | 72 69 67 69 6e 61 6c 20 |at the o|riginal |
|00000630| 7d 77 92 2d 00 01 55 7b | 6c 69 73 74 69 6e 67 20 |}w.-..U{|listing |
|00000640| 69 6e 20 74 68 65 20 62 | 6f 6f 6b 20 27 48 6f 77 |in the b|ook 'How|
|00000650| 20 54 6f 20 57 72 69 74 | 65 20 4d 61 63 69 6e 74 | To Writ|e Macint|
|00000660| 6f 73 68 20 53 6f 66 74 | 77 61 72 65 27 20 73 68 |osh Soft|ware' sh|
|00000670| 6f 75 6c 64 20 66 6c 75 | 73 68 20 6f 75 74 20 74 |ould flu|sh out t|
|00000680| 68 65 20 6f 74 68 65 72 | 73 2e 20 7d 94 01 ae 10 |he other|s. }....|
|00000690| 00 00 00 00 00 00 07 53 | 68 6f 77 6f 66 66 80 00 |.......S|howoff..|
|000006a0| 45 00 00 00 00 00 08 7c | 00 00 00 00 00 00 98 01 |E......||........|
|000006b0| 94 01 92 26 00 01 46 7b | 49 20 4c 45 46 54 20 4f |...&..F{|I LEFT O|
|000006c0| 55 54 20 54 48 45 20 27 | 55 53 45 53 27 20 53 45 |UT THE '|USES' SE|
|000006d0| 43 54 49 4f 4e 20 4f 46 | 20 54 48 45 20 50 52 4f |CTION OF| THE PRO|
|000006e0| 47 52 41 4d 20 46 4f 52 | 20 55 53 45 20 57 49 54 |GRAM FOR| USE WIT|
|000006f0| 48 20 4c 49 47 48 54 53 | 50 45 45 44 7d 5f 92 28 |H LIGHTS|PEED}_.(|
|00000700| 00 01 4a 7b 4c 69 67 68 | 74 53 70 65 65 64 20 64 |..J{Ligh|tSpeed d|
|00000710| 65 66 69 6e 65 73 20 74 | 68 65 20 69 6e 74 65 72 |efines t|he inter|
|00000720| 66 61 63 65 73 20 77 69 | 74 68 20 74 68 65 20 73 |faces wi|th the s|
|00000730| 74 61 6e 64 61 72 64 20 | 6c 69 62 61 72 69 65 73 |tandard |libaries|
|00000740| 20 27 4d 61 63 50 61 73 | 4c 69 62 27 7d 01 92 0b | 'MacPas|Lib'}...|
|00000750| 00 01 10 7b 61 6e 64 20 | 27 4d 61 63 54 72 61 70 |...{and |'MacTrap|
|00000760| 73 27 7d ad 94 01 94 01 | a2 01 94 01 92 29 00 01 |s'}.....|.....)..|
|00000770| 4d 7b 52 65 73 6f 75 72 | 63 65 73 20 20 66 6f 72 |M{Resour|ces  for|
|00000780| 20 4d 45 4e 55 73 20 61 | 6e 64 20 44 49 41 4c 4f | MENUs a|nd DIALO|
|00000790| 47 53 20 61 72 65 20 64 | 65 66 69 6e 65 64 20 69 |GS are d|efined i|
|000007a0| 6e 20 74 68 65 20 72 65 | 73 6f 75 72 63 65 20 66 |n the re|source f|
|000007b0| 69 6c 65 20 69 6e 63 6c | 75 64 65 64 20 7d 92 27 |ile incl|uded }.'|
|000007c0| 00 01 49 7b 77 69 74 68 | 20 74 68 69 73 20 76 65 |..I{with| this ve|
|000007d0| 72 73 69 6f 6e 20 6f 66 | 20 27 53 68 6f 77 4f 66 |rsion of| 'ShowOf|
|000007e0| 66 27 2e 20 20 54 68 65 | 20 66 69 6c 65 20 6e 61 |f'.  The| file na|
|000007f0| 6d 65 20 69 73 20 27 53 | 68 6f 77 4f 66 66 20 37 |me is 'S|howOff 7|
|00000800| 2d 32 2e 52 73 72 73 27 | 2e 20 20 7d 92 27 00 01 |-2.Rsrs'|.  }.'..|
|00000810| 48 7b 54 68 65 20 72 65 | 73 6f 75 72 63 65 20 66 |H{The re|source f|
|00000820| 69 6c 65 20 4d 55 53 54 | 20 62 65 20 69 6e 63 6c |ile MUST| be incl|
|00000830| 75 64 65 64 20 69 6e 20 | 74 68 65 20 52 55 4e 20 |uded in |the RUN |
|00000840| 4f 50 54 49 4f 4e 53 20 | 66 6f 72 20 74 68 65 20 |OPTIONS |for the |
|00000850| 70 72 6f 67 72 61 6d 20 | 7d 45 92 0e 00 01 16 7b |program |}E.....{|
|00000860| 74 6f 20 6f 70 65 72 61 | 74 65 20 63 6f 72 72 65 |to opera|te corre|
|00000870| 63 74 6c 79 7d 0d 94 01 | 94 01 b4 07 09 08 08 d4 |ctly}...|........|
|00000880| 07 61 70 70 6c 65 49 44 | 78 05 00 00 00 00 03 00 |.appleID|x.......|
|00000890| 00 80 98 01 92 1f 00 00 | 38 20 09 7b 72 65 73 6f |........|8 .{reso|
|000008a0| 75 72 63 65 20 49 44 73 | 2f 6d 65 6e 75 20 49 44 |urce IDs|/menu ID|
|000008b0| 73 20 66 6f 72 20 41 70 | 70 6c 65 2c 20 46 69 6c |s for Ap|ple, Fil|
|000008c0| 65 20 61 6e 64 20 45 64 | 69 74 20 6d 65 6e 75 73 |e and Ed|it menus|
|000008d0| 7d 65 b4 07 08 ee 09 9a | 06 66 69 6c 65 49 44 08 |}e......|.fileID.|
|000008e0| 78 05 00 00 00 00 03 00 | 00 81 98 01 b4 07 09 40 |x.......|.......@|
|000008f0| 09 b2 06 65 64 69 74 49 | 44 08 78 05 00 00 00 00 |...editI|D.x.....|
|00000900| 03 00 00 82 98 01 b4 07 | 00 00 0a 08 07 41 62 6f |........|.....Abo|
|00000910| 75 74 49 44 78 05 00 00 | 00 00 03 00 05 dc 98 01 |utIDx...|........|
|00000920| 92 0e 00 00 16 09 09 7b | 41 42 4f 55 54 20 6d 65 |.......{|ABOUT me|
|00000930| 6e 75 20 69 74 65 6d 20 | 49 44 7d 8b 94 01 b4 07 |nu item |ID}.....|
|00000940| 00 00 0a 7e 06 61 70 70 | 6c 65 4d 08 78 05 00 00 |...~.app|leM.x...|
|00000950| 00 00 03 00 00 01 98 01 | 92 20 00 00 3a 09 09 7b |........|. ..:..{|
|00000960| 69 6e 64 65 78 20 66 6f | 72 20 65 61 63 68 20 6d |index fo|r each m|
|00000970| 65 6e 75 20 69 6e 20 6d | 79 4d 65 6e 75 73 20 28 |enu in m|yMenus (|
|00000980| 61 72 72 61 79 20 6f 66 | 20 6d 65 6e 75 20 68 61 |array of| menu ha|
|00000990| 6e 64 6c 65 73 29 7d 41 | b4 06 00 00 09 cc 05 66 |ndles)}A|.......f|
|000009a0| 69 6c 65 4d 78 05 00 00 | 00 00 03 00 00 02 98 01 |ileMx...|........|
|000009b0| b4 06 00 00 0e 66 05 65 | 64 69 74 4d 78 05 00 00 |.....f.e|ditMx...|
|000009c0| 00 00 03 00 00 03 98 01 | 94 01 b4 08 0b fe 0a 42 |........|.......B|
|000009d0| 09 6d 65 6e 75 43 6f 75 | 6e 74 78 05 00 00 00 00 |.menuCou|ntx.....|
|000009e0| 03 00 00 03 98 01 92 0f | 00 00 19 09 09 7b 74 6f |........|.....{to|
|000009f0| 74 61 6c 20 6e 75 6d 62 | 65 72 20 6f 66 20 6d 65 |tal numb|er of me|
|00000a00| 6e 75 73 7d 94 01 b4 08 | 00 00 00 00 09 61 62 6f |nus}....|.....abo|
|00000a10| 75 74 49 74 65 6d 78 05 | 00 00 00 00 03 00 00 01 |utItemx.|........|
|00000a20| 98 01 92 0e 00 00 16 09 | 09 7b 69 74 65 6d 20 69 |........|.{item i|
|00000a30| 6e 20 41 70 70 6c 65 20 | 6d 65 6e 75 7d 00 94 01 |n Apple |menu}...|
|00000a40| b4 08 0a b4 0b 5e 08 75 | 6e 64 6f 49 74 65 6d 08 |.....^.u|ndoItem.|
|00000a50| 78 05 00 00 00 00 03 00 | 00 01 98 01 92 10 00 00 |x.......|........|
|00000a60| 1b 09 09 09 7b 69 74 65 | 6d 73 20 69 6e 20 74 68 |....{ite|ms in th|
|00000a70| 65 20 45 64 69 74 20 6d | 65 6e 75 7d b4 07 0a 98 |e Edit m|enu}....|
|00000a80| 0c fc 07 63 75 74 49 74 | 65 6d 78 05 00 00 00 00 |...cutIt|emx.....|
|00000a90| 03 00 00 03 98 01 b4 08 | 0a d0 00 00 08 63 6f 70 |........|.....cop|
|00000aa0| 79 49 74 65 6d 08 78 05 | 00 00 00 00 03 00 00 04 |yItem.x.|........|
|00000ab0| 98 01 b4 08 0a ee 0b 40 | 09 70 61 73 74 65 49 74 |.......@|.pasteIt|
|00000ac0| 65 6d 78 05 00 00 00 00 | 03 00 00 05 98 01 b4 08 |emx.....|........|
|00000ad0| 0c 76 0b 24 09 63 6c 65 | 61 72 49 74 65 6d 78 05 |.v.$.cle|arItemx.|
|00000ae0| 00 00 00 00 03 00 00 06 | 98 01 94 01 b4 07 0c 94 |........|........|
|00000af0| 10 e4 07 6e 65 77 49 74 | 65 6d 78 05 00 00 00 00 |...newIt|emx.....|
|00000b00| 03 00 00 01 98 01 92 0e | 00 00 17 09 09 09 7b 69 |........|......{i|
|00000b10| 74 65 6d 73 20 69 6e 20 | 46 69 6c 65 20 6d 65 6e |tems in |File men|
|00000b20| 75 7d b4 08 00 00 00 00 | 09 63 6c 6f 73 65 49 74 |u}......|.closeIt|
|00000b30| 65 6d 78 05 00 00 00 00 | 03 00 00 02 98 01 b4 08 |emx.....|........|
|00000b40| 00 00 0c 40 08 71 75 69 | 74 49 74 65 6d 08 78 05 |...@.qui|tItem.x.|
|00000b50| 00 00 00 00 03 00 00 04 | 98 01 94 01 b4 06 0b 9e |........|........|
|00000b60| 0f 70 05 77 4e 61 6d 65 | 78 08 00 00 00 00 05 00 |.p.wName|x.......|
|00000b70| 07 57 69 6e 64 6f 77 20 | 98 01 92 10 00 00 1a 09 |.Window |........|
|00000b80| 7b 70 72 65 66 69 78 20 | 66 6f 72 20 77 69 6e 64 |{prefix |for wind|
|00000b90| 6f 77 20 6e 61 6d 65 73 | 7d 04 94 01 b4 07 10 7e |ow names|}......~|
|00000ba0| 0b e2 06 77 69 6e 64 44 | 58 08 78 05 00 00 00 00 |...windD|X.x.....|
|00000bb0| 03 00 00 19 98 01 92 15 | 00 00 25 09 09 09 7b 64 |........|..%...{d|
|00000bc0| 69 73 74 61 6e 63 65 20 | 74 6f 20 6d 6f 76 65 20 |istance |to move |
|00000bd0| 66 6f 72 20 6e 65 77 20 | 77 69 6e 64 6f 77 73 7d |for new |windows}|
|00000be0| b4 07 00 00 00 00 06 77 | 69 6e 64 44 59 08 78 05 |.......w|indDY.x.|
|00000bf0| 00 00 00 00 03 00 00 19 | 98 01 94 01 b4 08 1e d8 |........|........|
|00000c00| 00 00 08 6c 65 66 74 45 | 64 67 65 08 78 05 00 00 |...leftE|dge.x...|
|00000c10| 00 00 03 00 00 0a 98 01 | 92 13 00 00 20 09 09 7b |........|.... ..{|
|00000c20| 69 6e 69 74 69 61 6c 20 | 64 69 6d 65 6e 73 69 6f |initial |dimensio|
|00000c30| 6e 73 20 6f 66 20 77 69 | 6e 64 6f 77 7d 00 b4 07 |ns of wi|ndow}...|
|00000c40| 0c 5a 0d 6a 07 74 6f 70 | 45 64 67 65 78 05 00 00 |.Z.j.top|Edgex...|
|00000c50| 00 00 03 00 00 2a 98 01 | b4 08 00 00 0d ca 09 72 |.....*..|.......r|
|00000c60| 69 67 68 74 45 64 67 65 | 78 05 00 00 00 00 03 00 |ightEdge|x.......|
|00000c70| 00 d2 98 01 b4 07 00 00 | 00 00 07 62 6f 74 45 64 |........|...botEd|
|00000c80| 67 65 78 05 00 00 00 00 | 03 00 00 af 98 01 94 01 |gex.....|........|
|00000c90| ba 01 7c 0b 0f 1a 0f d6 | 07 6d 79 4d 65 6e 75 73 |..|.....|.myMenus|
|00000ca0| 12 00 0c ac fd 4c 0c 98 | a6 01 b6 19 48 00 00 0c |.....L..|....H...|
|00000cb0| 0c cc 0c b4 44 00 00 01 | 00 03 03 00 00 01 00 00 |....D...|........|
|00000cc0| 09 e0 09 6d 65 6e 75 43 | 6f 75 6e 74 40 00 51 1b |...menuC|ount@.Q.|
|00000cd0| 0a 4d 65 6e 75 48 61 6e | 64 6c 65 08 98 01 92 0e |.MenuHan|dle.....|
|00000ce0| 00 00 17 20 7b 68 61 6e | 64 6c 65 73 20 74 6f 20 |... {han|dles to |
|00000cf0| 74 68 65 20 6d 65 6e 75 | 73 7d 7c 0c 0e be 00 00 |the menu|s}|.....|
|00000d00| 08 64 72 61 67 52 65 63 | 74 08 12 00 0d 16 fd 44 |.dragRec|t......D|
|00000d10| 0d 00 a6 01 7c 0a 40 00 | 0b 39 04 52 65 63 74 08 |....|.@.|.9.Rect.|
|00000d20| 00 00 00 00 00 00 00 00 | 98 01 92 1f 00 00 39 09 |........|......9.|
|00000d30| 09 09 7b 72 65 63 74 61 | 6e 67 6c 65 20 75 73 65 |..{recta|ngle use|
|00000d40| 64 20 74 6f 20 6d 61 72 | 6b 20 62 6f 75 6e 64 72 |d to mar|k boundr|
|00000d50| 69 65 73 20 66 6f 72 20 | 64 72 61 67 67 69 6e 67 |ies for |dragging|
|00000d60| 20 77 69 6e 64 6f 77 7d | 7c 0b 00 00 00 00 06 74 | window}||......t|
|00000d70| 78 52 65 63 74 08 12 00 | 0d 82 fd 3c 0d 6e a6 01 |xRect...|...<.n..|
|00000d80| 7c 0a 40 00 0b 39 04 52 | 65 63 74 08 00 00 00 00 ||.@..9.R|ect.....|
|00000d90| 00 00 00 00 98 01 92 19 | 00 00 2d 09 09 09 7b 72 |........|..-...{r|
|00000da0| 65 63 74 61 6e 67 6c 65 | 20 66 6f 72 20 74 65 78 |ectangle| for tex|
|00000db0| 74 20 69 6e 20 61 70 70 | 6c 69 63 61 74 69 6f 6e |t in app|lication|
|00000dc0| 20 77 69 6e 64 6f 77 7d | 7c 0a 12 00 0e 1e 05 74 | window}||......t|
|00000dd0| 65 78 74 48 12 00 0d e0 | fd 38 0d ce a6 01 7c 0c |extH....|.8....|.|
|00000de0| 40 00 4c 0f 08 54 45 48 | 61 6e 64 6c 65 08 00 00 |@.L..TEH|andle...|
|00000df0| 00 00 00 00 00 00 98 01 | 92 12 00 00 1f 09 09 09 |........|........|
|00000e00| 7b 68 61 6e 64 6c 65 20 | 66 6f 72 20 54 65 78 74 |{handle |for Text|
|00000e10| 45 64 69 74 20 72 65 63 | 6f 72 64 7d 7c 0b 00 00 |Edit rec|ord}|...|
|00000e20| 15 42 07 74 68 65 43 68 | 61 72 12 00 0e 36 fd 36 |.B.theCh|ar...6.6|
|00000e30| 0e 22 a6 01 7c 0a 40 00 | 00 1f 04 63 68 61 72 08 |."..|.@.|...char.|
|00000e40| 00 00 00 00 00 00 00 00 | 98 01 92 0d 00 00 14 09 |........|........|
|00000e50| 09 09 7b 74 79 70 65 64 | 20 63 68 61 72 61 63 74 |..{typed| charact|
|00000e60| 65 72 7d 6c 7c 0b 00 00 | 00 00 06 65 78 74 65 6e |er}l|...|...exten|
|00000e70| 64 08 12 00 0e 7e fd 35 | 0e 6a a6 01 7c 0b 40 00 |d....~.5|.j..|.@.|
|00000e80| 00 11 07 62 6f 6f 6c 65 | 61 6e 00 00 00 00 00 00 |...boole|an......|
|00000e90| 00 00 98 01 92 14 00 00 | 23 09 09 09 7b 74 72 75 |........|#...{tru|
|00000ea0| 65 20 69 66 20 75 73 65 | 72 20 69 73 20 53 68 69 |e if use|r is Shi|
|00000eb0| 66 74 2d 63 6c 69 63 6b | 69 6e 67 7d 7c 0c 2b 1a |ft-click|ing}|.+.|
|00000ec0| 00 00 08 64 6f 6e 65 46 | 6c 61 67 08 12 00 0e d8 |...doneF|lag.....|
|00000ed0| fd 34 0e c2 a6 01 7c 0b | 40 00 00 11 07 62 6f 6f |.4....|.|@....boo|
|00000ee0| 6c 65 61 6e 00 00 00 00 | 00 00 00 00 98 01 92 15 |lean....|........|
|00000ef0| 00 00 25 09 09 7b 74 72 | 75 65 20 69 66 20 75 73 |..%..{tr|ue if us|
|00000f00| 65 73 20 68 61 73 20 63 | 68 6f 73 65 6e 20 51 75 |es has c|hosen Qu|
|00000f10| 69 74 20 49 74 65 6d 7d | 7c 0b 12 58 27 0c 07 6d |it Item}||..X'..m|
|00000f20| 79 45 76 65 6e 74 12 00 | 0f 32 fd 24 0f 1e a6 01 |yEvent..|.2.$....|
|00000f30| 7c 0d 40 00 20 6d 0b 45 | 76 65 6e 74 52 65 63 6f ||.@. m.E|ventReco|
|00000f40| 72 64 00 00 00 00 00 00 | 00 00 98 01 92 11 00 00 |rd......|........|
|00000f50| 1d 09 7b 69 6e 66 6f 72 | 6d 61 74 69 6f 6e 20 61 |..{infor|mation a|
|00000f60| 62 6f 75 74 20 61 6e 20 | 65 76 65 6e 74 7d 7c 0b |bout an |event}|.|
|00000f70| 00 00 00 00 07 77 52 65 | 63 6f 72 64 12 00 0f 88 |.....wRe|cord....|
|00000f80| fc 88 0f 74 a6 01 7c 0e | 40 00 47 a5 0c 57 69 6e |...t..|.|@.G..Win|
|00000f90| 64 6f 77 52 65 63 6f 72 | 64 08 00 00 00 00 00 00 |dowRecor|d.......|
|00000fa0| 00 00 98 01 92 18 00 00 | 2b 09 7b 69 6e 66 6f 72 |........|+.{infor|
|00000fb0| 6d 61 74 69 6f 6e 20 61 | 62 6f 75 74 20 74 68 65 |mation a|bout the|
|00000fc0| 20 61 70 70 6c 69 63 61 | 74 69 6f 6e 20 77 69 6e | applica|tion win|
|00000fd0| 64 6f 77 7d 7c 0c 00 00 | 10 26 08 6d 79 57 69 6e |dow}|...|.&.myWin|
|00000fe0| 64 6f 77 08 12 00 0f f0 | fc 84 0f da a6 01 7c 0c |dow.....|......|.|
|00000ff0| 40 00 47 5f 09 57 69 6e | 64 6f 77 50 74 72 00 00 |@.G_.Win|dowPtr..|
|00001000| 00 00 00 00 00 00 98 01 | 92 0e 00 00 16 09 09 7b |........|.......{|
|00001010| 70 6f 69 6e 74 65 72 20 | 74 6f 20 77 52 65 63 6f |pointer |to wReco|
|00001020| 72 64 7d 69 7c 0c 00 00 | 14 06 09 6d 79 57 69 6e |rd}i|...|...myWin|
|00001030| 50 65 65 6b 12 00 10 40 | fc 80 10 2a a6 01 7c 0d |Peek...@|...*..|.|
|00001040| 40 00 47 75 0a 57 69 6e | 64 6f 77 50 65 65 6b 08 |@.Gu.Win|dowPeek.|
|00001050| 00 00 00 00 00 00 00 00 | 98 01 92 11 00 00 1d 09 |........|........|
|00001060| 7b 61 6e 6f 74 68 65 72 | 20 70 6f 69 6e 74 65 72 |{another| pointer|
|00001070| 20 74 6f 20 77 52 65 63 | 6f 72 64 7d 7c 0d 00 00 | to wRec|ord}|...|
|00001080| 00 00 0b 77 68 69 63 68 | 57 69 6e 64 6f 77 12 00 |...which|Window..|
|00001090| 10 9a fc 7c 10 82 a6 01 | 7c 0c 40 00 47 5f 09 57 |...|....||.@.G_.W|
|000010a0| 69 6e 64 6f 77 50 74 72 | 00 00 00 00 00 00 00 00 |indowPtr|........|
|000010b0| 98 01 92 18 00 00 2b 09 | 7b 77 69 6e 64 6f 77 20 |......+.|{window |
|000010c0| 69 6e 20 77 68 69 63 68 | 20 6d 6f 75 73 65 20 62 |in which| mouse b|
|000010d0| 75 74 74 6f 6e 20 77 61 | 73 20 70 72 65 73 73 65 |utton wa|s presse|
|000010e0| 64 7d 7c 0c 11 a2 11 44 | 09 6e 65 78 74 57 52 65 |d}|....D|.nextWRe|
|000010f0| 63 74 12 00 10 fe fc 74 | 10 e8 a6 01 7c 0a 40 00 |ct.....t|....|.@.|
|00001100| 0b 39 04 52 65 63 74 08 | 00 00 00 00 00 00 00 00 |.9.Rect.|........|
|00001110| 98 01 92 18 00 00 2a 09 | 09 09 7b 70 6f 72 74 52 |......*.|..{portR|
|00001120| 65 63 74 20 66 6f 72 20 | 6e 65 78 74 20 77 69 6e |ect for |next win|
|00001130| 64 6f 77 20 74 6f 20 62 | 65 20 6f 70 65 6e 65 64 |dow to b|e opened|
|00001140| 7d 7d 7c 0d 00 00 19 90 | 0a 6e 65 78 74 57 54 69 |}}|.....|.nextWTi|
|00001150| 74 6c 65 08 12 00 11 60 | fb 74 11 48 a6 01 7c 0b |tle....`|.t.H..|.|
|00001160| 40 00 05 1d 06 53 74 72 | 32 35 35 08 00 00 00 00 |@....Str|255.....|
|00001170| 00 00 00 00 98 01 92 15 | 00 00 25 09 09 7b 74 69 |........|..%..{ti|
|00001180| 74 6c 65 20 6f 66 20 6e | 65 78 74 20 77 69 6e 64 |tle of n|ext wind|
|00001190| 6f 77 20 74 6f 20 62 65 | 20 6f 70 65 6e 65 64 7d |ow to be| opened}|
|000011a0| 7c 0c 00 00 00 00 08 6e | 65 78 74 77 4e 75 6d 08 ||......n|extwNum.|
|000011b0| 12 00 11 bc fb 70 11 a6 | a6 01 7c 0b 40 00 00 3f |.....p..|..|.@..?|
|000011c0| 07 4c 6f 6e 67 69 6e 74 | 00 00 00 00 00 00 00 00 |.Longint|........|
|000011d0| 98 01 92 16 00 00 26 09 | 09 09 7b 6e 75 6d 62 65 |......&.|..{numbe|
|000011e0| 72 20 6f 66 20 6e 65 78 | 74 20 77 69 6e 64 6f 77 |r of nex|t window|
|000011f0| 20 28 66 6f 72 20 74 69 | 74 6c 65 29 7d 19 7c 0c | (for ti|tle)}.|.|
|00001200| 00 00 12 aa 09 73 61 76 | 65 64 50 6f 72 74 12 00 |.....sav|edPort..|
|00001210| 12 1a fb 6c 12 04 a6 01 | 7c 0b 40 00 11 b7 07 47 |...l....||.@....G|
|00001220| 72 61 66 50 74 72 00 00 | 00 00 00 00 00 00 98 01 |rafPtr..|........|
|00001230| 92 13 00 00 21 09 09 09 | 7b 70 6f 69 6e 74 65 72 |....!...|{pointer|
|00001240| 20 74 6f 20 70 72 65 73 | 65 72 76 65 20 47 72 61 | to pres|erve Gra|
|00001250| 66 50 6f 72 74 7d 7c 0b | 00 00 00 00 07 6d 65 6e |fPort}|.|.....men|
|00001260| 75 73 4f 4b 12 00 12 70 | fb 6b 12 5c a6 01 7c 0b |usOK...p|.k.\..|.|
|00001270| 40 00 00 11 07 62 6f 6f | 6c 65 61 6e 00 00 00 00 |@....boo|lean....|
|00001280| 00 00 00 00 98 01 92 11 | 00 00 1c 09 09 09 7b 66 |........|......{f|
|00001290| 6f 72 20 64 69 61 62 6c | 69 6e 67 20 6d 65 6e 75 |or diabl|ing menu|
|000012a0| 20 69 74 65 6d 73 7d 09 | 7c 0c 00 00 12 dc 08 73 | items}.||......s|
|000012b0| 63 72 61 70 45 72 72 08 | 12 00 12 c4 fb 66 12 ae |crapErr.|.....f..|
|000012c0| a6 01 7c 0b 40 00 00 3f | 07 4c 6f 6e 67 69 6e 74 |..|.@..?|.Longint|
|000012d0| 00 00 00 00 00 00 00 00 | 98 01 7c 0d 00 00 16 bc |........|..|.....|
|000012e0| 0a 73 63 72 43 6f 70 79 | 45 72 72 08 12 00 12 f8 |.scrCopy|Err.....|
|000012f0| fb 64 12 e0 a6 01 7c 0b | 40 00 00 2f 07 69 6e 74 |.d....|.|@../.int|
|00001300| 65 67 65 72 00 00 00 00 | 00 00 00 00 98 01 94 01 |eger....|........|
|00001310| 92 25 00 01 44 7b 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |.%..D{==|========|
|00001320| 3d 3d 3d 3d 20 53 50 45 | 43 49 41 4c 20 56 41 52 |==== SPE|CIAL VAR|
|00001330| 49 41 42 4c 45 53 20 46 | 4f 52 20 50 41 53 43 41 |IABLES F|OR PASCA|
|00001340| 4c 20 54 59 50 45 20 43 | 4f 45 52 43 49 4f 4e 20 |L TYPE C|OERCION |
|00001350| 3d 3d 3d 3d 3d 3d 3d 3d | 7d 4a 92 29 00 01 4d 7b |========|}J.)..M{|
|00001360| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 20 52 65 71 75 69 72 |========|= Requir|
|00001370| 65 64 20 74 6f 20 67 65 | 74 20 27 53 68 6f 77 4f |ed to ge|t 'ShowO|
|00001380| 66 66 27 20 74 6f 20 72 | 75 6e 20 75 6e 64 65 72 |ff' to r|un under|
|00001390| 20 4c 69 67 68 74 53 70 | 65 65 64 20 50 61 73 63 | LightSp|eed Pasc|
|000013a0| 61 6c 20 20 3d 3d 3d 3d | 3d 3d 3d 7d 92 2b 00 01 |al  ====|===}.+..|
|000013b0| 50 7b 3d 3d 3d 3d 3d 3d | 3d 20 4f 74 68 65 72 20 |P{======|= Other |
|000013c0| 27 63 6f 65 72 63 69 6f | 6e 27 20 76 61 72 69 61 |'coercio|n' varia|
|000013d0| 62 6c 65 73 20 61 72 65 | 20 69 6e 63 6c 75 64 65 |bles are| include|
|000013e0| 64 20 69 6e 20 73 70 65 | 63 69 66 69 63 20 72 6f |d in spe|cific ro|
|000013f0| 75 74 69 6e 65 73 20 3d | 3d 3d 3d 3d 3d 3d 3d 3d |utines =|========|
|00001400| 7d 86 94 01 7c 0d 00 00 | 14 70 0a 6d 79 57 69 6e |}...|...|.p.myWin|
|00001410| 50 65 65 6b 32 08 12 00 | 14 22 fb 60 14 0a a6 01 |Peek2...|.".`....|
|00001420| 7c 0d 40 00 47 75 0a 57 | 69 6e 64 6f 77 50 65 65 ||.@.Gu.W|indowPee|
|00001430| 6b 08 00 00 00 00 00 00 | 00 00 98 01 92 19 00 00 |k.......|........|
|00001440| 2d 09 09 7b 74 65 6d 70 | 20 76 61 72 69 61 62 6c |-..{temp| variabl|
|00001450| 65 20 66 6f 72 20 75 73 | 61 67 65 20 66 6f 72 20 |e for us|age for |
|00001460| 74 79 70 65 20 63 6f 65 | 72 63 69 6f 6e 7d 7c 0d |type coe|rcion}|.|
|00001470| 00 00 14 da 0a 6d 79 57 | 69 6e 50 65 65 6b 33 08 |.....myW|inPeek3.|
|00001480| 12 00 14 8c fb 5c 14 74 | a6 01 7c 0d 40 00 47 75 |.....\.t|..|.@.Gu|
|00001490| 0a 57 69 6e 64 6f 77 50 | 65 65 6b 08 00 00 00 00 |.WindowP|eek.....|
|000014a0| 00 00 00 00 98 01 92 19 | 00 00 2d 09 09 7b 74 65 |........|..-..{te|
|000014b0| 6d 70 20 76 61 72 69 61 | 62 6c 65 20 66 6f 72 20 |mp varia|ble for |
|000014c0| 75 73 61 67 65 20 66 6f | 72 20 74 79 70 65 20 63 |usage fo|r type c|
|000014d0| 6f 65 72 63 69 6f 6e 7d | 7c 0c 00 00 00 00 08 6d |oercion}||......m|
|000014e0| 79 57 69 6e 50 74 72 08 | 12 00 14 f4 fb 58 14 de |yWinPtr.|.....X..|
|000014f0| a6 01 7c 0c 40 00 47 5f | 09 57 69 6e 64 6f 77 50 |..|.@.G_|.WindowP|
|00001500| 74 72 00 00 00 00 00 00 | 00 00 98 01 92 1a 00 00 |tr......|........|
|00001510| 2e 09 09 09 7b 74 65 6d | 70 20 76 61 72 69 61 62 |....{tem|p variab|
|00001520| 6c 65 20 66 6f 72 20 75 | 73 61 67 65 20 66 6f 72 |le for u|sage for|
|00001530| 20 74 79 70 65 20 63 6f | 65 72 63 69 6f 6e 7d 00 | type co|ercion}.|
|00001540| 7c 0c 16 10 15 a8 09 74 | 68 65 52 65 66 63 6f 6e ||......t|heRefcon|
|00001550| 12 00 15 5c fb 54 15 46 | a6 01 7c 0b 40 00 00 3f |...\.T.F|..|.@..?|
|00001560| 07 6c 6f 6e 67 49 6e 74 | 00 00 00 00 00 00 00 00 |.longInt|........|
|00001570| 98 01 92 1a 00 00 2f 09 | 09 09 09 7b 74 65 6d 70 |....../.|...{temp|
|00001580| 20 76 61 72 69 61 62 6c | 65 20 66 6f 72 20 75 73 | variabl|e for us|
|00001590| 61 67 65 20 66 6f 72 20 | 74 79 70 65 20 63 6f 65 |age for |type coe|
|000015a0| 72 63 69 6f 6e 7d 7c 0d | 00 00 00 00 0a 74 68 65 |rcion}|.|.....the|
|000015b0| 57 69 6e 4b 69 6e 64 08 | 12 00 15 c4 fb 52 15 ac |WinKind.|.....R..|
|000015c0| a6 01 7c 0b 40 00 00 2f | 07 69 6e 74 65 67 65 72 |..|.@../|.integer|
|000015d0| 00 00 00 00 00 00 00 00 | 98 01 92 1a 00 00 2f 09 |........|....../.|
|000015e0| 09 09 09 7b 74 65 6d 70 | 20 76 61 72 69 61 62 6c |...{temp| variabl|
|000015f0| 65 20 66 6f 72 20 75 73 | 61 67 65 20 66 6f 72 20 |e for us|age for |
|00001600| 74 79 70 65 20 63 6f 65 | 72 63 69 6f 6e 7d 7c 0b |type coe|rcion}|.|
|00001610| 00 00 00 00 07 74 68 65 | 52 65 63 74 12 00 16 28 |.....the|Rect...(|
|00001620| fb 4a 16 14 a6 01 7c 0a | 40 00 0b 39 04 52 65 63 |.J....|.|@..9.Rec|
|00001630| 74 08 00 00 00 00 00 00 | 00 00 98 01 92 1b 00 00 |t.......|........|
|00001640| 30 09 09 09 09 09 7b 74 | 65 6d 70 20 76 61 72 69 |0.....{t|emp vari|
|00001650| 61 62 6c 65 20 66 6f 72 | 20 75 73 61 67 65 20 66 |able for| usage f|
|00001660| 6f 72 20 74 79 70 65 20 | 63 6f 65 72 63 69 6f 6e |or type |coercion|
|00001670| 7d 00 94 01 92 22 00 01 | 3e 7b 3d 3d 3d 3d 3d 3d |}...."..|>{======|
|00001680| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001690| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000016a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000016b0| 3d 3d 3d 3d 3d 3d 7d 6f | b0 12 14 ce 00 00 00 00 |======}o|........|
|000016c0| 0a 53 65 74 55 70 4d 65 | 6e 75 73 08 81 00 17 2c |.SetUpMe|nus....,|
|000016d0| 00 00 01 00 17 04 06 9e | 00 01 00 00 98 01 92 10 |........|........|
|000016e0| 00 01 1b 7b 73 65 74 20 | 75 70 20 6d 65 6e 75 73 |...{set |up menus|
|000016f0| 20 61 6e 64 20 6d 65 6e | 75 20 62 61 73 7d 94 01 | and men|u bas}..|
|00001700| ba 01 7c 08 00 00 00 00 | 01 69 12 00 17 16 ff ee |..|.....|.i......|
|00001710| 17 08 a6 01 7c 0b 40 00 | 00 2f 07 69 6e 74 65 67 |....|.@.|./.integ|
|00001720| 65 72 00 00 00 00 00 00 | 00 00 98 01 7e 03 17 2e |er......|....~...|
|00001730| 18 e2 80 15 5c 07 6d 79 | 4d 65 6e 75 73 18 5c 06 |....\.my|Menus.\.|
|00001740| 61 70 70 6c 65 4d 1c 0a | 5c 07 47 65 74 4d 65 6e |appleM..|\.GetMen|
|00001750| 75 10 5c 07 61 70 70 6c | 65 49 44 16 98 01 92 0c |u.\.appl|eID.....|
|00001760| 00 00 13 09 09 7b 72 65 | 61 64 20 41 70 70 6c 65 |.....{re|ad Apple|
|00001770| 20 6d 65 6e 75 7d 84 15 | 0a 41 64 64 52 65 73 4d | menu}..|.AddResM|
|00001780| 65 6e 75 10 5c 07 6d 79 | 4d 65 6e 75 73 18 5c 06 |enu.\.my|Menus.\.|
|00001790| 61 70 70 6c 65 4d 1c 12 | 5a 05 04 44 52 56 52 16 |appleM..|Z..DRVR.|
|000017a0| 98 01 92 11 00 00 1c 09 | 09 7b 61 64 64 20 64 65 |........|.{add de|
|000017b0| 73 6b 20 61 63 63 65 73 | 73 6f 72 79 20 6e 61 6d |sk acces|sory nam|
|000017c0| 65 73 7d 9a 80 14 5c 07 | 6d 79 4d 65 6e 75 73 18 |es}...\.|myMenus.|
|000017d0| 5c 05 66 69 6c 65 4d 1c | 0a 5c 07 47 65 74 4d 65 |\.fileM.|.\.GetMe|
|000017e0| 6e 75 10 5c 06 66 69 6c | 65 49 44 16 98 01 92 0c |nu.\.fil|eID.....|
|000017f0| 00 00 13 09 09 09 7b 72 | 65 61 64 20 66 69 6c 65 |......{r|ead file|
|00001800| 20 6d 65 6e 75 7d 80 14 | 5c 07 6d 79 4d 65 6e 75 | menu}..|\.myMenu|
|00001810| 73 18 5c 05 65 64 69 74 | 4d 1c 0a 5c 07 47 65 74 |s.\.edit|M..\.Get|
|00001820| 4d 65 6e 75 10 5c 06 65 | 64 69 74 49 44 16 98 01 |Menu.\.e|ditID...|
|00001830| 92 0c 00 00 13 09 09 09 | 7b 72 65 61 64 20 65 64 |........|{read ed|
|00001840| 69 74 20 6d 65 6e 75 7d | 94 01 8e 0a 01 69 5a 03 |it menu}|.....iZ.|
|00001850| 00 01 0c 5c 09 6d 65 6e | 75 43 6f 75 6e 74 84 12 |...\.men|uCount..|
|00001860| 0a 49 6e 73 65 72 74 4d | 65 6e 75 10 5c 07 6d 79 |.InsertM|enu.\.my|
|00001870| 4d 65 6e 75 73 18 5c 01 | 69 1c 12 08 5a 03 00 00 |Menus.\.|i...Z...|
|00001880| 16 08 98 01 92 11 00 00 | 1d 09 09 7b 69 6e 73 74 |........|...{inst|
|00001890| 61 6c 6c 20 6d 65 6e 75 | 73 20 69 6e 20 6d 65 6e |all menu|s in men|
|000018a0| 75 20 62 61 72 7d 7c 0d | 00 00 00 00 0b 44 72 61 |u bar}|.|.....Dra|
|000018b0| 77 4d 65 6e 75 42 61 72 | 00 00 00 00 00 00 00 00 |wMenuBar|........|
|000018c0| 98 01 92 0f 00 00 19 09 | 09 09 09 09 09 7b 61 6e |........|.....{an|
|000018d0| 64 20 64 72 61 77 20 6d | 65 6e 75 20 62 61 72 7d |d draw m|enu bar}|
|000018e0| 9a 01 98 01 92 0e 00 00 | 17 09 09 09 09 09 09 09 |........|........|
|000018f0| 09 09 09 09 7b 53 65 74 | 55 70 4d 65 6e 75 73 7d |....{Set|UpMenus}|
|00001900| 92 22 00 01 3e 7b 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |."..>{==|========|
|00001910| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001920| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001930| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001940| 3d 3d 7d 3d 94 01 94 01 | 92 22 00 01 3e 7b 3d 3d |==}=....|."..>{==|
|00001950| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001960| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001970| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001980| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 7d 00 b0 12 17 6e |========|==}....n|
|00001990| 00 00 00 00 0a 4f 70 65 | 6e 57 69 6e 64 6f 77 08 |.....Ope|nWindow.|
|000019a0| 81 00 19 cc 00 00 01 00 | 00 00 06 9e 00 02 00 00 |........|........|
|000019b0| 98 01 92 0c 00 01 13 7b | 6f 70 65 6e 20 61 20 6e |.......{|open a n|
|000019c0| 65 77 20 77 69 6e 64 6f | 77 7d 94 01 7e 03 1c 76 |ew windo|w}..~..v|
|000019d0| 1e 32 84 14 0b 4e 75 6d | 54 6f 53 74 72 69 6e 67 |.2...Num|ToString|
|000019e0| 10 5c 08 6e 65 78 74 57 | 4e 75 6d 12 5c 0a 6e 65 |.\.nextW|Num.\.ne|
|000019f0| 78 74 57 54 69 74 6c 65 | 16 08 98 01 92 11 00 00 |xtWTitle|........|
|00001a00| 1c 20 09 09 7b 70 72 65 | 70 61 72 65 20 6e 75 6d |. ..{pre|pare num|
|00001a10| 62 65 72 20 6f 66 20 74 | 69 74 6c 65 7d 01 80 17 |ber of t|itle}...|
|00001a20| 5c 0a 6e 65 78 74 57 54 | 69 74 6c 65 0a 5c 06 63 |\.nextWT|itle.\.c|
|00001a30| 6f 6e 63 61 74 10 5c 05 | 77 4e 61 6d 65 12 5c 0a |oncat.\.|wName.\.|
|00001a40| 6e 65 78 74 57 54 69 74 | 6c 65 16 08 98 01 92 0c |nextWTit|le......|
|00001a50| 00 00 12 20 20 09 7b 61 | 64 64 20 74 6f 20 70 72 |...  .{a|dd to pr|
|00001a60| 65 66 69 78 7d 6e 80 35 | 5c 08 6d 79 57 69 6e 64 |efix}n.5|\.myWind|
|00001a70| 6f 77 0a 5c 09 4e 65 77 | 57 69 6e 64 6f 77 10 58 |ow.\.New|Window.X|
|00001a80| 12 5c 09 6e 65 78 74 57 | 52 65 63 74 12 5c 0a 6e |.\.nextW|Rect.\.n|
|00001a90| 65 78 74 57 54 69 74 6c | 65 12 5c 04 54 72 75 65 |extWTitl|e.\.True|
|00001aa0| 12 5c 0d 6e 6f 67 72 6f | 77 44 6f 63 50 72 6f 63 |.\.nogro|wDocProc|
|00001ab0| 12 5c 07 50 6f 69 6e 74 | 65 72 10 42 5a 03 00 01 |.\.Point|er.BZ...|
|00001ac0| 16 12 5c 04 54 72 75 65 | 12 08 5a 03 00 00 16 08 |..\.True|..Z.....|
|00001ad0| 98 01 92 0c 00 00 13 09 | 09 7b 6f 70 65 6e 20 74 |........|.{open t|
|00001ae0| 68 65 20 77 69 6e 64 6f | 77 7d 84 0b 07 53 65 74 |he windo|w}...Set|
|00001af0| 50 6f 72 74 10 5c 08 6d | 79 77 69 6e 64 6f 77 16 |Port.\.m|ywindow.|
|00001b00| 98 01 92 14 00 00 22 09 | 09 09 09 09 09 09 09 7b |......".|.......{|
|00001b10| 6d 61 6b 65 20 69 74 20 | 74 68 65 20 63 75 72 72 |make it |the curr|
|00001b20| 65 6e 74 20 70 6f 72 74 | 7d 00 80 10 5c 06 74 78 |ent port|}...\.tx|
|00001b30| 52 65 63 74 0a 5c 07 74 | 68 65 50 6f 72 74 54 52 |Rect.\.t|hePortTR|
|00001b40| 5c 08 70 6f 72 74 52 65 | 63 74 98 01 92 14 00 00 |\.portRe|ct......|
|00001b50| 23 09 09 7b 70 72 65 70 | 61 72 65 20 54 45 52 65 |#..{prep|are TERe|
|00001b60| 63 6f 72 64 20 66 6f 72 | 20 6e 65 77 20 77 69 6e |cord for| new win|
|00001b70| 64 6f 77 7d 84 11 09 49 | 6e 73 65 74 52 65 63 74 |dow}...I|nsetRect|
|00001b80| 10 5c 06 74 78 52 65 63 | 74 12 5a 03 00 04 12 08 |.\.txRec|t.Z.....|
|00001b90| 5a 03 00 00 16 08 98 01 | 80 12 5c 05 74 65 78 74 |Z.......|..\.text|
|00001ba0| 48 0a 5c 05 54 45 4e 65 | 77 10 5c 06 54 78 52 65 |H.\.TENe|w.\.TxRe|
|00001bb0| 63 74 12 5c 06 54 78 52 | 65 63 74 16 98 01 80 13 |ct.\.TxR|ect.....|
|00001bc0| 5c 09 6d 79 57 69 6e 50 | 65 65 6b 0a 5c 0a 57 69 |\.myWinP|eek.\.Wi|
|00001bd0| 6e 64 6f 77 50 65 65 6b | 10 5c 08 6d 79 57 69 6e |ndowPeek|.\.myWin|
|00001be0| 64 6f 77 16 98 01 80 15 | 5c 09 6d 79 57 69 6e 50 |dow.....|\.myWinP|
|00001bf0| 65 65 6b 54 52 5c 06 72 | 65 66 63 6f 6e 0a 5c 07 |eekTR\.r|efcon.\.|
|00001c00| 4c 6f 6e 67 69 6e 74 10 | 5c 05 74 65 78 74 48 16 |Longint.|\.textH.|
|00001c10| 98 01 92 11 00 00 1d 09 | 09 7b 6b 65 65 70 20 54 |........|.{keep T|
|00001c20| 45 48 61 6e 64 6c 65 20 | 69 6e 20 72 65 66 63 6f |EHandle |in refco|
|00001c30| 6e 21 21 7d 84 16 0a 4f | 66 66 73 65 74 52 65 63 |n!!}...O|ffsetRec|
|00001c40| 74 10 5c 09 6e 65 78 74 | 57 52 65 63 74 12 5c 06 |t.\.next|WRect.\.|
|00001c50| 77 69 6e 64 44 58 12 5c | 06 77 69 6e 64 44 59 16 |windDX.\|.windDY.|
|00001c60| 98 01 92 12 00 00 1e 09 | 09 7b 6d 6f 76 65 20 77 |........|.{move w|
|00001c70| 69 6e 64 6f 77 20 64 6f | 77 6e 20 61 6e 64 20 72 |indow do|wn and r|
|00001c80| 69 67 68 74 7d 00 94 01 | 86 14 5c 09 6e 65 78 74 |ight}...|..\.next|
|00001c90| 57 52 65 63 74 52 5c 05 | 72 69 67 68 74 4a 5c 08 |WRectR\.|rightJ\.|
|00001ca0| 64 72 61 67 52 65 63 74 | 52 5c 05 72 69 67 68 74 |dragRect|R\.right|
|00001cb0| 92 15 00 00 25 20 09 09 | 09 09 7b 6d 6f 76 65 20 |....% ..|..{move |
|00001cc0| 62 61 63 6b 20 69 66 20 | 69 74 27 73 20 74 6f 6f |back if |it's too|
|00001cd0| 20 66 61 72 20 6f 76 65 | 72 7d 84 20 0a 4f 66 66 | far ove|r}. .Off|
|00001ce0| 73 65 74 52 65 63 74 10 | 5c 09 6e 65 78 74 57 52 |setRect.|\.nextWR|
|00001cf0| 65 63 74 12 42 5c 09 6e | 65 78 74 57 52 65 63 74 |ect.B\.n|extWRect|
|00001d00| 52 5c 04 6c 65 66 74 3a | 5c 08 6c 65 66 74 45 64 |R\.left:|\.leftEd|
|00001d10| 67 65 12 08 5a 03 00 00 | 16 08 98 01 86 15 5c 09 |ge..Z...|......\.|
|00001d20| 6e 65 78 74 57 52 65 63 | 74 52 5c 06 62 6f 74 74 |nextWRec|tR\.bott|
|00001d30| 6f 6d 4a 5c 08 64 72 61 | 67 52 65 63 74 52 5c 06 |omJ\.dra|gRectR\.|
|00001d40| 62 6f 74 74 6f 6d 84 1e | 0a 4f 66 66 73 65 74 52 |bottom..|.OffsetR|
|00001d50| 65 63 74 10 5c 09 6e 65 | 78 74 57 52 65 63 74 12 |ect.\.ne|xtWRect.|
|00001d60| 5a 03 00 00 12 42 5c 09 | 6e 65 78 74 57 52 65 63 |Z....B\.|nextWRec|
|00001d70| 74 52 5c 03 74 6f 70 3a | 5c 07 74 6f 70 45 64 67 |tR\.top:|\.topEdg|
|00001d80| 65 16 98 01 80 0e 5c 08 | 6e 65 78 74 57 4e 75 6d |e.....\.|nextWNum|
|00001d90| 0a 5c 08 6e 65 78 74 57 | 4e 75 6d 3a 5a 03 00 01 |.\.nextW|Num:Z...|
|00001da0| 98 01 92 13 00 00 21 09 | 09 09 09 7b 62 75 6d 70 |......!.|...{bump|
|00001db0| 20 6e 75 6d 62 65 72 20 | 66 6f 72 20 6e 65 78 74 | number |for next|
|00001dc0| 20 77 69 6e 64 6f 77 7d | 80 0a 5c 07 6d 65 6e 75 | window}|..\.menu|
|00001dd0| 73 4f 4b 0a 5c 05 66 61 | 6c 73 65 08 98 01 84 14 |sOK.\.fa|lse.....|
|00001de0| 0a 45 6e 61 62 6c 65 49 | 74 65 6d 10 5c 07 6d 79 |.EnableI|tem.\.my|
|00001df0| 4d 65 6e 75 73 18 5c 05 | 65 64 69 74 4d 1c 12 08 |Menus.\.|editM...|
|00001e00| 5a 03 00 00 16 08 98 01 | 92 14 00 00 23 09 09 7b |Z.......|....#..{|
|00001e10| 69 6e 20 63 61 73 65 20 | 74 68 69 73 20 69 73 20 |in case |this is |
|00001e20| 74 68 65 20 6f 6e 6c 79 | 20 77 69 6e 64 6f 77 7d |the only| window}|
|00001e30| 9a 01 98 01 92 0b 00 00 | 11 09 09 7b 6f 66 20 4f |........|...{of O|
|00001e40| 70 65 6e 57 69 6e 64 6f | 77 7d 92 22 00 01 3e 7b |penWindo|w}."..>{|
|00001e50| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001e60| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001e70| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001e80| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 7d 3d 94 01 |========|====}=..|
|00001e90| 92 22 00 01 3e 7b 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |."..>{==|========|
|00001ea0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001eb0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001ec0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001ed0| 3d 3d 7d 3d b0 12 1e a8 | 41 40 00 00 0a 4b 69 6c |==}=....|A@...Kil|
|00001ee0| 6c 57 69 6e 64 6f 77 08 | 81 00 21 06 1f 0a 01 00 |lWindow.|..!.....|
|00001ef0| 1e fc 06 9e 00 03 00 04 | a8 01 7c 0c 1f 66 20 9e |........|..|..f .|
|00001f00| 09 74 68 65 57 69 6e 64 | 6f 77 16 00 1f 16 00 00 |.theWind|ow......|
|00001f10| 00 08 a6 01 7c 0c 40 00 | 47 5f 09 57 69 6e 64 6f |....|.@.|G_.Windo|
|00001f20| 77 50 74 72 00 00 00 00 | 00 00 00 00 aa 01 98 01 |wPtr....|........|
|00001f30| 92 18 00 01 2a 7b 63 6c | 6f 73 65 20 61 20 77 69 |....*{cl|ose a wi|
|00001f40| 6e 64 6f 77 20 61 6e 64 | 20 74 68 72 6f 77 20 65 |ndow and| throw e|
|00001f50| 76 65 72 79 74 68 69 6e | 67 20 61 77 61 79 7d 80 |verythin|g away}.|
|00001f60| 94 01 ba 01 7c 0c 00 00 | 1f ce 09 6d 79 57 69 6e |....|...|...myWin|
|00001f70| 50 65 65 6b 12 00 1f 80 | ff ec 1f 6a a6 01 7c 0d |Peek....|...j..|.|
|00001f80| 40 00 47 75 0a 57 69 6e | 64 6f 77 50 65 65 6b 08 |@.Gu.Win|dowPeek.|
|00001f90| 00 00 00 00 00 00 00 00 | 98 01 92 19 00 00 2c 09 |........|......,.|
|00001fa0| 7b 74 65 6d 70 20 76 61 | 72 69 61 62 6c 65 20 66 |{temp va|riable f|
|00001fb0| 6f 72 20 75 73 61 67 65 | 20 66 6f 72 20 74 79 70 |or usage| for typ|
|00001fc0| 65 20 63 6f 65 72 63 69 | 6f 6e 7d ad 7c 0d 00 00 |e coerci|on}.|...|
|00001fd0| 20 38 0a 6d 79 57 69 6e | 50 65 65 6b 32 08 12 00 | 8.myWin|Peek2...|
|00001fe0| 1f ea ff e8 1f d2 a6 01 | 7c 0d 40 00 47 75 0a 57 |........||.@.Gu.W|
|00001ff0| 69 6e 64 6f 77 50 65 65 | 6b 08 00 00 00 00 00 00 |indowPee|k.......|
|00002000| 00 00 98 01 92 19 00 00 | 2c 09 7b 74 65 6d 70 20 |........|,.{temp |
|00002010| 76 61 72 69 61 62 6c 65 | 20 66 6f 72 20 75 73 61 |variable| for usa|
|00002020| 67 65 20 66 6f 72 20 74 | 79 70 65 20 63 6f 65 72 |ge for t|ype coer|
|00002030| 63 69 6f 6e 7d 00 7c 0c | 00 00 00 00 09 74 68 65 |cion}.|.|.....the|
|00002040| 52 65 66 63 6f 6e 12 00 | 20 52 ff e4 20 3c a6 01 |Refcon..| R.. <..|
|00002050| 7c 0b 40 00 00 3f 07 6c | 6f 6e 67 49 6e 74 00 00 ||.@..?.l|ongInt..|
|00002060| 00 00 00 00 00 00 98 01 | 92 1a 00 00 2e 09 09 09 |........|........|
|00002070| 7b 74 65 6d 70 20 76 61 | 72 69 61 62 6c 65 20 66 |{temp va|riable f|
|00002080| 6f 72 20 75 73 61 67 65 | 20 66 6f 72 20 74 79 70 |or usage| for typ|
|00002090| 65 20 63 6f 65 72 63 69 | 6f 6e 7d 20 7c 0d 00 00 |e coerci|on} |...|
|000020a0| 00 00 0a 74 68 65 57 69 | 6e 4b 69 6e 64 08 12 00 |...theWi|nKind...|
|000020b0| 20 ba ff e2 20 a2 a6 01 | 7c 0b 40 00 00 2f 07 69 | ... ...||.@../.i|
|000020c0| 6e 74 65 67 65 72 00 00 | 00 00 00 00 00 00 98 01 |nteger..|........|
|000020d0| 92 1a 00 00 2e 09 09 09 | 7b 74 65 6d 70 20 76 61 |........|{temp va|
|000020e0| 72 69 61 62 6c 65 20 66 | 6f 72 20 75 73 61 67 65 |riable f|or usage|
|000020f0| 20 66 6f 72 20 74 79 70 | 65 20 63 6f 65 72 63 69 | for typ|e coerci|
|00002100| 6f 6e 7d 03 94 01 7e 03 | 24 aa 26 68 92 24 00 01 |on}...~.|$.&h.$..|
|00002110| 42 7b 54 48 45 53 45 20 | 53 54 41 54 45 4d 45 4e |B{THESE |STATEMEN|
|00002120| 54 53 20 41 52 45 20 4e | 45 45 44 45 44 20 46 4f |TS ARE N|EEDED FO|
|00002130| 52 20 43 4f 45 52 43 49 | 4f 4e 20 4c 41 54 45 52 |R COERCI|ON LATER|
|00002140| 2c 20 4d 55 53 54 20 42 | 45 20 48 45 52 45 20 54 |, MUST B|E HERE T|
|00002150| 4f 20 7d 58 92 21 00 01 | 3c 7b 41 56 4f 49 44 20 |O }X.!..|<{AVOID |
|00002160| 41 20 27 4e 49 4c 20 52 | 45 46 45 52 45 4e 43 45 |A 'NIL R|EFERENCE|
|00002170| 27 20 45 52 52 4f 52 20 | 57 48 45 4e 20 43 4c 4f |' ERROR |WHEN CLO|
|00002180| 53 49 4e 47 20 54 48 45 | 20 4c 41 53 54 20 57 49 |SING THE| LAST WI|
|00002190| 4e 44 4f 57 7d 6f 80 15 | 5c 0a 6d 79 57 69 6e 50 |NDOW}o..|\.myWinP|
|000021a0| 65 65 6b 32 0a 5c 0a 57 | 69 6e 64 6f 77 50 65 65 |eek2.\.W|indowPee|
|000021b0| 6b 10 5c 0b 46 72 6f 6e | 74 57 69 6e 64 6f 77 16 |k.\.Fron|tWindow.|
|000021c0| 98 01 92 11 00 00 1d 09 | 7b 73 70 65 63 69 61 6c |........|{special|
|000021d0| 20 63 6f 65 72 63 69 6f | 6e 20 6f 66 20 74 79 70 | coercio|n of typ|
|000021e0| 65 73 20 7d 80 15 5c 0a | 74 68 65 57 69 6e 4b 69 |es }..\.|theWinKi|
|000021f0| 6e 64 0a 5c 0a 6d 79 57 | 69 6e 50 65 65 6b 32 54 |nd.\.myW|inPeek2T|
|00002200| 52 5c 0a 57 69 6e 64 6f | 77 4b 69 6e 64 08 98 01 |R\.Windo|wKind...|
|00002210| 92 12 00 00 1e 09 09 7b | 73 70 65 63 69 61 6c 20 |.......{|special |
|00002220| 63 6f 65 72 63 69 6f 6e | 20 6f 66 20 74 79 70 65 |coercion| of type|
|00002230| 73 20 7d 00 94 01 94 01 | 92 20 00 01 3a 7b 42 45 |s }.....|. ..:{BE|
|00002240| 4c 4f 57 20 49 53 20 54 | 48 45 20 4f 52 49 47 49 |LOW IS T|HE ORIGI|
|00002250| 4e 41 4c 20 53 54 41 54 | 45 4d 45 4e 54 20 57 48 |NAL STAT|EMENT WH|
|00002260| 49 43 48 20 4c 53 50 20 | 57 4f 55 4c 44 4e 27 54 |ICH LSP |WOULDN'T|
|00002270| 20 41 4c 4c 4f 57 7d 92 | 92 2e 00 01 57 7b 54 45 | ALLOW}.|....W{TE|
|00002280| 44 69 73 70 6f 73 65 20 | 28 20 54 45 48 61 6e 64 |Dispose |( TEHand|
|00002290| 6c 65 20 28 20 57 69 6e | 64 6f 77 50 65 65 6b 20 |le ( Win|dowPeek |
|000022a0| 28 20 74 68 65 57 69 6e | 64 6f 77 20 29 20 5e 20 |( theWin|dow ) ^ |
|000022b0| 2e 20 72 65 66 63 6f 6e | 20 29 20 29 3b 09 09 7b |. refcon| ) );..{|
|000022c0| 74 68 72 6f 77 20 61 77 | 61 79 20 54 45 52 65 63 |throw aw|ay TERec|
|000022d0| 6f 72 64 7d 94 01 92 1f | 00 01 39 7b 54 48 45 53 |ord}....|..9{THES|
|000022e0| 45 20 41 52 45 20 54 48 | 45 20 46 49 58 45 44 20 |E ARE TH|E FIXED |
|000022f0| 53 54 41 54 45 4d 45 4e | 54 53 2c 20 43 4f 45 52 |STATEMEN|TS, COER|
|00002300| 43 45 44 20 49 4e 54 4f | 20 41 43 43 45 50 54 41 |CED INTO| ACCEPTA|
|00002310| 4e 43 45 7d 80 14 5c 09 | 6d 79 57 69 6e 50 65 65 |NCE}..\.|myWinPee|
|00002320| 6b 0a 5c 0a 57 69 6e 64 | 6f 77 50 65 65 6b 10 5c |k.\.Wind|owPeek.\|
|00002330| 09 74 68 65 57 69 6e 64 | 6f 77 16 08 98 01 92 12 |.theWind|ow......|
|00002340| 00 00 1e 09 09 7b 73 70 | 65 63 69 61 6c 20 63 6f |.....{sp|ecial co|
|00002350| 65 72 63 69 6f 6e 20 6f | 66 20 74 79 70 65 73 20 |ercion o|f types |
|00002360| 7d 00 80 12 5c 09 74 68 | 65 52 65 66 63 6f 6e 0a |}...\.th|eRefcon.|
|00002370| 5c 09 6d 79 57 69 6e 50 | 65 65 6b 54 52 5c 06 72 |\.myWinP|eekTR\.r|
|00002380| 65 66 63 6f 6e 08 98 01 | 92 13 00 00 20 09 09 09 |efcon...|.... ...|
|00002390| 09 7b 73 70 65 63 69 61 | 6c 20 63 6f 65 72 63 69 |.{specia|l coerci|
|000023a0| 6f 6e 20 6f 66 20 74 79 | 70 65 73 20 7d 6f 84 13 |on of ty|pes }o..|
|000023b0| 09 54 45 44 69 73 70 6f | 73 65 10 5c 08 54 45 48 |.TEDispo|se.\.TEH|
|000023c0| 61 6e 64 6c 65 10 5c 09 | 74 68 65 52 65 66 63 6f |andle.\.|theRefco|
|000023d0| 6e 16 16 08 98 01 92 0e | 00 00 17 09 09 7b 74 68 |n.......|.....{th|
|000023e0| 72 6f 77 20 61 77 61 79 | 20 54 45 52 65 63 6f 72 |row away| TERecor|
|000023f0| 64 7d 94 01 84 0f 0d 44 | 69 73 70 6f 73 65 57 69 |d}.....D|isposeWi|
|00002400| 6e 64 6f 77 10 5c 09 74 | 68 65 57 69 6e 64 6f 77 |ndow.\.t|heWindow|
|00002410| 16 08 98 01 92 11 00 00 | 1d 20 09 09 09 7b 74 68 |........|. ...{th|
|00002420| 72 6f 77 20 61 77 61 79 | 20 57 69 6e 64 6f 77 52 |row away| WindowR|
|00002430| 65 63 6f 72 64 7d 80 06 | 5c 05 74 65 78 74 48 0a |ecord}..|\.textH.|
|00002440| 58 08 98 01 92 16 00 00 | 27 09 09 09 09 09 09 09 |X.......|'.......|
|00002450| 09 7b 66 6f 72 20 54 45 | 49 64 6c 65 20 69 6e 20 |.{for TE|Idle in |
|00002460| 6d 61 69 6e 20 65 76 65 | 6e 74 20 6c 6f 6f 70 7d |main eve|nt loop}|
|00002470| 86 09 5c 0b 46 72 6f 6e | 74 57 69 6e 64 6f 77 44 |..\.Fron|tWindowD|
|00002480| 58 08 92 15 00 00 24 09 | 09 7b 69 66 20 6e 6f 20 |X.....$.|.{if no |
|00002490| 6d 6f 72 65 20 77 69 6e | 64 6f 77 73 20 64 69 73 |more win|dows dis|
|000024a0| 61 62 6c 65 20 43 4c 4f | 53 45 7d 6f 84 17 0b 44 |able CLO|SE}o...D|
|000024b0| 69 73 61 62 6c 65 49 74 | 65 6d 10 5c 07 6d 79 4d |isableIt|em.\.myM|
|000024c0| 65 6e 75 73 18 5c 05 66 | 69 6c 65 4d 1c 12 5c 09 |enus.\.f|ileM..\.|
|000024d0| 63 6c 6f 73 65 49 74 65 | 6d 16 98 01 94 01 92 20 |closeIte|m...... |
|000024e0| 00 01 3a 7b 42 45 4c 4f | 57 20 49 53 20 54 48 45 |..:{BELO|W IS THE|
|000024f0| 20 4f 52 49 47 49 4e 41 | 4c 20 53 54 41 54 45 4d | ORIGINA|L STATEM|
|00002500| 45 4e 54 20 57 48 49 43 | 48 20 4c 53 50 20 57 4f |ENT WHIC|H LSP WO|
|00002510| 55 4c 44 4e 27 54 20 41 | 4c 4c 4f 57 7d 20 92 33 |ULDN'T A|LLOW} .3|
|00002520| 00 01 60 7b 69 66 20 57 | 69 6e 64 6f 77 50 65 65 |..`{if W|indowPee|
|00002530| 6b 20 28 20 46 72 6f 6e | 74 57 69 6e 64 6f 77 20 |k ( Fron|tWindow |
|00002540| 29 20 5e 20 2e 20 77 69 | 6e 64 6f 77 4b 69 6e 64 |) ^ . wi|ndowKind|
|00002550| 20 3c 20 30 20 74 68 65 | 6e 09 7b 69 66 20 61 20 | < 0 the|n.{if a |
|00002560| 64 65 73 6b 20 61 63 63 | 20 69 73 20 63 6f 6d 69 |desk acc| is comi|
|00002570| 6e 67 20 75 70 2c 20 65 | 6e 61 62 6c 65 20 75 6e |ng up, e|nable un|
|00002580| 64 6f 7d 02 94 01 92 1e | 00 01 36 7b 54 48 49 53 |do}.....|..6{THIS|
|00002590| 20 49 53 20 54 48 45 20 | 46 49 58 45 44 20 53 54 | IS THE |FIXED ST|
|000025a0| 41 54 45 4d 45 4e 54 2c | 20 43 4f 45 52 43 45 44 |ATEMENT,| COERCED|
|000025b0| 20 49 4e 54 4f 20 41 43 | 43 45 50 54 41 4e 43 45 | INTO AC|CEPTANCE|
|000025c0| 7d 2a 86 0a 5c 0a 74 68 | 65 57 69 6e 4b 69 6e 64 |}*..\.th|eWinKind|
|000025d0| 48 08 5a 03 00 00 92 18 | 00 00 2b 20 09 7b 69 66 |H.Z.....|..+ .{if|
|000025e0| 20 61 20 64 65 73 6b 20 | 61 63 63 20 69 73 20 63 | a desk |acc is c|
|000025f0| 6f 6d 69 6e 67 20 75 70 | 2c 20 65 6e 61 62 6c 65 |oming up|, enable|
|00002600| 20 75 6e 64 6f 7d 94 01 | 84 16 0a 45 6e 61 62 6c | undo}..|...Enabl|
|00002610| 65 49 74 65 6d 10 5c 07 | 6d 79 4d 65 6e 75 73 18 |eItem.\.|myMenus.|
|00002620| 5c 05 65 64 69 74 4d 1c | 12 5c 08 75 6e 64 6f 49 |\.editM.|.\.undoI|
|00002630| 74 65 6d 16 96 01 84 17 | 0b 44 69 73 61 62 6c 65 |tem.....|.Disable|
|00002640| 49 74 65 6d 10 5c 07 6d | 79 4d 65 6e 75 73 18 5c |Item.\.m|yMenus.\|
|00002650| 05 65 64 69 74 4d 1c 12 | 5c 08 75 6e 64 6f 49 74 |.editM..|\.undoIt|
|00002660| 65 6d 16 08 98 01 9a 01 | 98 01 92 0a 00 00 0e 09 |em......|........|
|00002670| 09 7b 4b 69 6c 6c 57 69 | 6e 64 6f 77 7d ec 92 22 |.{KillWi|ndow}.."|
|00002680| 00 01 3e 7b 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |..>{====|========|
|00002690| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000026a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000026b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000026c0| 7d da 94 01 92 22 00 01 | 3e 7b 3d 3d 3d 3d 3d 3d |}...."..|>{======|
|000026d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000026e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000026f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002700| 3d 3d 3d 3d 3d 3d 7d 6a | b2 14 26 52 00 00 00 00 |======}j|..&R....|
|00002710| 08 4d 79 46 69 6c 74 65 | 72 08 80 00 28 b0 27 42 |.MyFilte|r...(.'B|
|00002720| 01 00 27 34 06 9e 00 04 | 00 0c 27 d4 00 14 00 01 |..'4....|..'.....|
|00002730| a8 01 7c 0c 27 a2 27 6a | 09 74 68 65 44 69 61 6c |..|.'.'j|.theDial|
|00002740| 6f 67 16 00 27 4e 27 78 | 00 10 a6 01 7c 0c 40 00 |og..'N'x|....|.@.|
|00002750| 4e 8f 09 44 69 61 6c 6f | 67 50 74 72 00 00 00 00 |N..Dialo|gPtr....|
|00002760| 00 00 00 00 98 01 ba 01 | 7c 0c 00 00 27 f0 08 74 |........||...'..t|
|00002770| 68 65 45 76 65 6e 74 08 | 17 00 27 84 27 ae 00 0c |heEvent.|..'.'...|
|00002780| a6 01 7c 0d 40 00 20 6d | 0b 45 76 65 6e 74 52 65 |..|.@. m|.EventRe|
|00002790| 63 6f 72 64 00 00 00 00 | 00 00 00 00 98 01 ba 01 |cord....|........|
|000027a0| 7c 0b 28 7e 28 50 07 69 | 74 65 6d 48 69 74 17 00 ||.(~(P.i|temHit..|
|000027b0| 27 ba 00 00 00 08 a6 01 | 7c 0b 40 00 00 2f 07 49 |'.......||.@../.I|
|000027c0| 6e 74 65 67 65 72 00 00 | 00 00 00 00 00 00 aa 01 |nteger..|........|
|000027d0| a6 01 7c 0b 40 00 00 11 | 07 42 6f 6f 6c 65 61 6e |..|.@...|.Boolean|
|000027e0| 00 00 00 00 00 00 00 00 | 98 01 94 01 ba 01 7c 0b |........|......|.|
|000027f0| 28 20 00 00 07 74 68 65 | 54 79 70 65 12 00 28 08 |( ...the|Type..(.|
|00002800| ff ee 27 f4 a6 01 7c 0b | 40 00 00 2f 07 69 6e 74 |..'...|.|@../.int|
|00002810| 65 67 65 72 00 00 00 00 | 00 00 00 00 98 01 7c 0b |eger....|......|.|
|00002820| 00 00 00 00 07 74 68 65 | 49 74 65 6d 12 00 28 38 |.....the|Item..(8|
|00002830| ff ea 28 24 a6 01 7c 0b | 40 00 04 e9 06 68 61 6e |..($..|.|@....han|
|00002840| 64 6c 65 08 00 00 00 00 | 00 00 00 00 98 01 7c 0b |dle.....|......|.|
|00002850| 00 00 00 00 06 74 68 65 | 42 6f 78 08 12 00 28 68 |.....the|Box...(h|
|00002860| ff e2 28 54 a6 01 7c 0a | 40 00 0b 39 04 52 65 63 |..(T..|.|@..9.Rec|
|00002870| 74 08 00 00 00 00 00 00 | 00 00 98 01 7c 0d 00 00 |t.......|....|...|
|00002880| 00 00 0a 66 69 6e 61 6c | 54 69 63 6b 73 08 12 00 |...final|Ticks...|
|00002890| 28 9a ff de 28 82 a6 01 | 7c 0b 40 00 00 3f 07 4c |(...(...||.@..?.L|
|000028a0| 6f 6e 67 69 6e 74 00 00 | 00 00 00 00 00 00 98 01 |ongint..|........|
|000028b0| 7e 03 28 b8 2a 6e 86 37 | 20 5c 06 42 69 74 41 6e |~.(.*n.7| \.BitAn|
|000028c0| 64 10 5c 08 74 68 65 45 | 76 65 6e 74 52 5c 07 6d |d.\.theE|ventR\.m|
|000028d0| 65 73 73 61 67 65 12 5c | 0c 63 68 61 72 43 6f 64 |essage.\|.charCod|
|000028e0| 65 4d 61 73 6b 16 44 08 | 5a 03 00 0d 22 3e 20 5c |eMask.D.|Z..."> \|
|000028f0| 06 42 49 74 41 6e 64 10 | 5c 08 74 68 65 45 76 65 |.BItAnd.|\.theEve|
|00002900| 6e 74 52 5c 07 6d 65 73 | 73 61 67 65 12 5c 0c 63 |ntR\.mes|sage.\.c|
|00002910| 68 61 72 43 6f 64 65 4d | 61 73 6b 16 44 08 5a 03 |harCodeM|ask.D.Z.|
|00002920| 00 03 22 08 92 10 00 01 | 1b 20 7b 63 61 72 72 69 |..".....|. {carri|
|00002930| 61 67 65 20 72 65 74 75 | 72 6e 20 6f 72 20 65 6e |age retu|rn or en|
|00002940| 74 65 72 7d 7e 03 00 00 | 2a 54 84 1d 08 47 65 74 |ter}~...|*T...Get|
|00002950| 44 49 74 65 6d 10 5c 09 | 74 68 65 44 69 61 6c 6f |DItem.\.|theDialo|
|00002960| 67 12 5a 03 00 01 12 5c | 07 74 68 65 54 79 70 65 |g.Z....\|.theType|
|00002970| 12 5c 07 74 68 65 49 74 | 65 6d 12 5c 06 74 68 65 |.\.theIt|em.\.the|
|00002980| 42 6f 78 16 98 01 84 19 | 0d 48 69 6c 69 74 65 43 |Box.....|.HiliteC|
|00002990| 6f 6e 74 72 6f 6c 10 5c | 0d 43 6f 6e 74 72 6f 6c |ontrol.\|.Control|
|000029a0| 48 61 6e 64 6c 65 10 5c | 07 74 68 65 49 74 65 6d |Handle.\|.theItem|
|000029b0| 16 12 5a 03 00 01 16 08 | 98 01 84 0e 05 44 65 6c |..Z.....|.....Del|
|000029c0| 61 79 10 08 5a 03 00 08 | 12 5c 0a 66 69 6e 61 6c |ay..Z...|.\.final|
|000029d0| 54 69 63 6b 73 16 98 01 | 84 19 0d 48 69 6c 69 74 |Ticks...|...Hilit|
|000029e0| 65 43 6f 6e 74 72 6f 6c | 10 5c 0d 43 6f 6e 74 72 |eControl|.\.Contr|
|000029f0| 6f 6c 48 61 6e 64 6c 65 | 10 5c 07 74 68 65 49 74 |olHandle|.\.theIt|
|00002a00| 65 6d 16 12 5a 03 00 00 | 16 08 98 01 80 08 5c 07 |em..Z...|......\.|
|00002a10| 69 74 65 6d 48 69 74 0a | 5a 03 00 01 98 01 80 0a |itemHit.|Z.......|
|00002a20| 5c 08 4d 79 46 69 6c 74 | 65 72 0a 5c 04 54 72 75 |\.MyFilt|er.\.Tru|
|00002a30| 65 08 98 01 9a 01 92 0f | 00 00 18 20 7b 69 66 20 |e.......|... {if |
|00002a40| 42 69 74 41 6e 64 2e 2e | 2e 74 68 65 20 62 65 67 |BitAnd..|.the beg|
|00002a50| 69 6e 7d 00 96 01 80 0a | 5c 08 4d 79 46 69 6c 74 |in}.....|\.MyFilt|
|00002a60| 65 72 0a 5c 05 46 61 6c | 73 65 98 01 9a 01 98 01 |er.\.Fal|se......|
|00002a70| 92 0d 00 00 15 09 09 7b | 66 75 6e 63 74 69 6f 6e |.......{|function|
|00002a80| 20 4d 79 46 69 6c 74 65 | 72 7d 94 01 92 22 00 01 | MyFilte|r}..."..|
|00002a90| 3e 7b 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |>{======|========|
|00002aa0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002ab0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002ac0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 7d 3d |========|======}=|
|00002ad0| 94 01 92 22 00 01 3e 7b | 3d 3d 3d 3d 3d 3d 3d 3d |..."..>{|========|
|00002ae0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002af0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002b00| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002b10| 3d 3d 3d 3d 7d 06 b0 12 | 29 14 00 00 30 9c 0a 44 |====}...|)...0..D|
|00002b20| 6f 41 62 6f 75 74 42 6f | 78 08 81 00 2b 72 00 00 |oAboutBo|x...+r..|
|00002b30| 01 00 2b 42 06 9e 00 05 | 00 00 98 01 94 01 ba 01 |..+B....|........|
|00002b40| 7c 0b 00 00 00 00 07 69 | 74 65 6d 48 69 74 12 00 ||......i|temHit..|
|00002b50| 2b 5a ff ee 2b 46 a6 01 | 7c 0b 40 00 00 2f 07 49 |+Z..+F..||.@../.I|
|00002b60| 6e 74 65 67 65 72 00 00 | 00 00 00 00 00 00 98 01 |nteger..|........|
|00002b70| 94 01 7e 03 2e 3a 2c 0a | 80 1f 5c 08 6d 79 57 69 |..~..:,.|..\.myWi|
|00002b80| 6e 64 6f 77 0a 5c 0c 47 | 65 74 4e 65 77 44 69 61 |ndow.\.G|etNewDia|
|00002b90| 6c 6f 67 10 5a 03 03 e8 | 12 26 5c 08 4d 79 46 69 |log.Z...|.&\.MyFi|
|00002ba0| 6c 74 65 72 12 5c 07 70 | 6f 69 6e 74 65 72 10 42 |lter.\.p|ointer.B|
|00002bb0| 5a 03 00 01 16 16 98 01 | 8c 02 2b e8 84 0e 0b 4d |Z.......|..+....M|
|00002bc0| 6f 64 61 6c 44 69 61 6c | 6f 67 10 58 12 5c 07 69 |odalDial|og.X.\.i|
|00002bd0| 74 65 6d 68 69 74 16 08 | 74 08 5c 07 69 74 65 6d |temhit..|t.\.item|
|00002be0| 48 69 74 44 5a 03 00 01 | 98 01 84 0e 0c 44 69 73 |HitDZ...|.....Dis|
|00002bf0| 70 6f 73 44 69 61 6c 6f | 67 10 5c 08 6d 79 57 69 |posDialo|g.\.myWi|
|00002c00| 6e 64 6f 77 16 08 98 01 | 9a 01 98 01 92 0f 00 00 |ndow....|........|
|00002c10| 19 09 09 7b 70 72 6f 63 | 65 64 75 72 65 20 44 6f |...{proc|edure Do|
|00002c20| 41 62 6f 75 74 42 6f 78 | 29 7d 94 01 92 22 00 01 |AboutBox|)}..."..|
|00002c30| 3e 7b 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |>{======|========|
|00002c40| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002c50| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002c60| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 7d ee |========|======}.|
|00002c70| 94 01 92 22 00 01 3e 7b | 3d 3d 3d 3d 3d 3d 3d 3d |..."..>{|========|
|00002c80| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002c90| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002ca0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002cb0| 3d 3d 3d 3d 7d cc 92 26 | 00 01 47 7b 4d 55 43 48 |====}..&|..G{MUCH|
|00002cc0| 20 53 49 4d 50 4c 49 46 | 49 45 44 20 56 45 52 53 | SIMPLIF|IED VERS|
|00002cd0| 49 4f 4e 20 4f 46 20 4f | 52 49 47 49 4e 41 4c 20 |ION OF O|RIGINAL |
|00002ce0| 27 41 62 6f 75 74 20 53 | 68 6f 77 4f 66 66 27 20 |'About S|howOff' |
|00002cf0| 41 50 50 4c 45 20 4d 45 | 4e 55 20 49 54 45 4d 2c |APPLE ME|NU ITEM,|
|00002d00| 20 7d 92 24 00 01 43 7b | 54 48 4f 55 47 48 20 59 | }.$..C{|THOUGH Y|
|00002d10| 4f 55 20 57 4f 4e 27 54 | 20 47 45 54 20 54 48 45 |OU WON'T| GET THE|
|00002d20| 20 43 48 41 4e 43 45 20 | 54 4f 20 46 49 58 20 54 | CHANCE |TO FIX T|
|00002d30| 48 45 20 27 53 45 43 52 | 45 54 27 20 42 55 47 20 |HE 'SECR|ET' BUG |
|00002d40| 44 45 53 43 52 49 42 45 | 44 7d 92 26 00 01 47 7b |DESCRIBE|D}.&..G{|
|00002d50| 49 4e 20 41 53 43 49 49 | 20 4c 45 54 54 45 52 49 |IN ASCII| LETTERI|
|00002d60| 4e 47 20 4f 4e 20 50 41 | 47 45 20 32 36 34 20 4f |NG ON PA|GE 264 O|
|00002d70| 46 20 27 48 6f 77 20 54 | 6f 20 57 72 69 74 65 20 |F 'How T|o Write |
|00002d80| 4d 61 63 69 6e 74 6f 73 | 68 20 53 6f 66 74 77 61 |Macintos|h Softwa|
|00002d90| 72 65 2e 27 20 7d 94 01 | 92 28 00 01 4b 7b 49 46 |re.' }..|.(..K{IF|
|00002da0| 20 54 48 49 53 20 53 45 | 43 52 45 54 20 42 55 47 | THIS SE|CRET BUG|
|00002db0| 20 49 53 20 4f 46 20 49 | 4e 54 45 52 45 53 54 20 | IS OF I|NTEREST |
|00002dc0| 54 4f 20 59 4f 55 2c 20 | 44 45 42 55 47 20 54 48 |TO YOU, |DEBUG TH|
|00002dd0| 45 20 4f 52 49 47 49 4e | 41 4c 20 43 4f 44 45 2c |E ORIGIN|AL CODE,|
|00002de0| 20 41 42 4f 56 45 2c 7d | 92 26 00 01 46 7b 46 4f | ABOVE,}|.&..F{FO|
|00002df0| 52 20 54 48 45 20 20 27 | 66 75 6e 63 74 69 6f 6e |R THE  '|function|
|00002e00| 20 4d 79 46 69 6c 74 65 | 72 27 20 41 4e 44 20 27 | MyFilte|r' AND '|
|00002e10| 70 72 6f 63 65 64 75 72 | 65 20 44 6f 41 62 6f 75 |procedur|e DoAbou|
|00002e20| 74 42 6f 78 27 20 41 4e | 44 20 50 55 54 20 54 48 |tBox' AN|D PUT TH|
|00002e30| 45 20 7d 67 92 25 00 01 | 44 7b 4f 52 49 47 49 4e |E }g.%..|D{ORIGIN|
|00002e40| 41 4c 20 43 4f 4d 4d 41 | 4e 44 20 27 44 6f 41 62 |AL COMMA|ND 'DoAb|
|00002e50| 6f 75 74 42 6f 78 27 20 | 42 41 43 4b 20 49 4e 20 |outBox' |BACK IN |
|00002e60| 54 48 45 20 27 70 72 6f | 63 65 64 75 72 65 20 44 |THE 'pro|cedure D|
|00002e70| 6f 43 6f 6d 6d 61 6e 64 | 27 20 49 4e 7d 1f 92 27 |oCommand|' IN}..'|
|00002e80| 00 01 48 7b 54 48 45 20 | 27 63 61 73 65 20 6f 66 |..H{THE |'case of|
|00002e90| 20 61 70 70 6c 65 49 44 | 27 20 53 45 43 54 49 4f | appleID|' SECTIO|
|00002ea0| 4e 20 4f 46 20 54 48 45 | 20 27 44 6f 43 6f 6d 6d |N OF THE| 'DoComm|
|00002eb0| 61 6e 64 27 20 52 4f 55 | 54 49 4e 45 20 54 4f 20 |and' ROU|TINE TO |
|00002ec0| 4d 41 4b 45 20 54 48 45 | 20 20 7d ad 92 13 00 01 |MAKE THE|  }.....|
|00002ed0| 21 7b 4f 52 49 47 49 4e | 41 4c 20 43 41 4c 4c 20 |!{ORIGIN|AL CALL |
|00002ee0| 54 4f 20 27 44 6f 41 62 | 6f 75 74 42 6f 78 27 2e |TO 'DoAb|outBox'.|
|00002ef0| 20 7d 94 01 92 27 00 01 | 49 7b 57 49 54 48 20 54 | }...'..|I{WITH T|
|00002f00| 48 45 20 42 4f 4f 4b 20 | 46 4f 52 4d 41 54 20 54 |HE BOOK |FORMAT T|
|00002f10| 48 45 20 27 41 62 6f 75 | 74 20 53 68 6f 77 4f 66 |HE 'Abou|t ShowOf|
|00002f20| 66 27 20 46 45 41 54 55 | 52 45 20 43 41 55 53 45 |f' FEATU|RE CAUSE|
|00002f30| 44 20 41 20 42 41 44 20 | 43 52 41 53 48 20 41 4e |D A BAD |CRASH AN|
|00002f40| 44 7d 92 2b 00 01 50 7b | 42 55 52 4e 2c 20 49 20 |D}.+..P{|BURN, I |
|00002f50| 54 48 49 4e 4b 20 49 54 | 20 4e 45 45 44 45 44 20 |THINK IT| NEEDED |
|00002f60| 41 20 52 45 53 4f 55 52 | 43 45 20 4f 46 20 49 44 |A RESOUR|CE OF ID|
|00002f70| 3d 31 30 30 30 20 54 4f | 20 42 45 20 43 52 45 41 |=1000 TO| BE CREA|
|00002f80| 54 45 44 20 49 4e 20 41 | 20 46 4f 52 4d 41 54 20 |TED IN A| FORMAT |
|00002f90| 4f 54 48 45 52 20 7d 07 | 92 28 00 01 4a 7b 54 48 |OTHER }.|.(..J{TH|
|00002fa0| 41 4e 20 54 48 45 20 57 | 41 59 20 49 20 48 41 56 |AN THE W|AY I HAV|
|00002fb0| 45 20 43 52 45 41 54 45 | 44 20 54 48 45 20 27 41 |E CREATE|D THE 'A|
|00002fc0| 4c 52 54 27 20 52 45 53 | 4f 55 52 43 45 2e 20 20 |LRT' RES|OURCE.  |
|00002fd0| 53 49 4e 43 45 20 54 48 | 45 20 43 4f 44 45 20 44 |SINCE TH|E CODE D|
|00002fe0| 49 44 4e 27 54 20 7d df | 92 27 00 01 48 7b 57 4f |IDN'T }.|.'..H{WO|
|00002ff0| 52 4b 20 27 41 53 20 57 | 45 4c 4c 27 20 41 53 20 |RK 'AS W|ELL' AS |
|00003000| 57 41 53 20 49 4e 44 49 | 43 41 54 45 44 20 49 4e |WAS INDI|CATED IN|
|00003010| 20 54 48 45 20 42 4f 4f | 4b 20 49 54 20 57 41 53 | THE BOO|K IT WAS|
|00003020| 20 42 45 54 54 45 52 20 | 54 4f 20 44 55 50 4c 49 | BETTER |TO DUPLI|
|00003030| 43 41 54 45 7d 2e 92 25 | 00 01 45 7b 54 48 45 20 |CATE}..%|..E{THE |
|00003040| 4e 45 45 44 45 44 20 46 | 55 4e 43 54 49 4f 4e 2c |NEEDED F|UNCTION,|
|00003050| 20 57 49 54 48 4f 55 54 | 20 41 4c 4c 20 54 48 45 | WITHOUT| ALL THE|
|00003060| 20 43 4f 44 45 20 4c 49 | 4e 45 53 20 41 4e 44 20 | CODE LI|NES AND |
|00003070| 44 45 42 55 47 47 49 4e | 47 20 54 49 4d 45 2e 7d |DEBUGGIN|G TIME.}|
|00003080| 92 0b 00 01 11 7b 53 74 | 65 76 65 20 53 63 61 6e |.....{St|eve Scan|
|00003090| 64 61 6c 69 73 7d 94 01 | b0 12 2f 46 00 00 32 8c |dalis}..|../F..2.|
|000030a0| 0b 44 6f 41 70 70 6c 65 | 4d 65 6e 75 81 00 31 a4 |.DoApple|Menu..1.|
|000030b0| 00 00 01 00 31 72 06 9e | 00 06 00 00 98 01 92 2d |....1r..|.......-|
|000030c0| 00 01 55 7b 47 65 74 20 | 74 68 65 20 27 41 62 6f |..U{Get |the 'Abo|
|000030d0| 75 74 20 53 68 6f 77 4f | 66 66 2e 2e 2e 27 20 41 |ut ShowO|ff...' A|
|000030e0| 4c 52 54 2c 20 61 6e 64 | 20 77 61 69 74 20 75 6e |LRT, and| wait un|
|000030f0| 74 69 6c 20 74 68 65 20 | 75 73 65 72 20 63 6c 69 |til the |user cli|
|00003100| 63 6b 73 20 69 6e 20 74 | 68 65 20 27 4f 4b 27 20 |cks in t|he 'OK' |
|00003110| 62 75 74 74 6f 6e 2e 7d | 92 2b 00 01 50 7b 54 68 |button.}|.+..P{Th|
|00003120| 65 20 41 4c 52 54 20 69 | 73 20 64 65 66 69 6e 65 |e ALRT i|s define|
|00003130| 64 20 69 6e 20 74 68 65 | 20 6c 69 6e 6b 65 64 20 |d in the| linked |
|00003140| 52 45 53 4f 55 52 43 45 | 20 66 69 6c 65 20 73 70 |RESOURCE| file sp|
|00003150| 65 63 69 66 69 65 64 20 | 69 6e 20 74 68 65 20 50 |ecified |in the P|
|00003160| 52 4f 4a 45 43 54 20 66 | 69 6c 65 2e 7d 00 ba 01 |ROJECT f|ile.}...|
|00003170| 7c 0c 00 00 00 00 09 6f | 70 65 6e 41 6c 65 72 74 ||......o|penAlert|
|00003180| 12 00 31 8c ff ee 31 76 | a6 01 7c 0b 40 00 00 2f |..1...1v|..|.@../|
|00003190| 07 69 6e 74 65 67 65 72 | 00 00 00 00 00 00 00 00 |.integer|........|
|000031a0| 98 01 94 01 7e 03 30 2a | 31 fc 80 11 5c 09 6f 70 |....~.0*|1...\.op|
|000031b0| 65 6e 41 6c 65 72 74 0a | 5c 05 41 6c 65 72 74 10 |enAlert.|\.Alert.|
|000031c0| 5c 07 41 62 6f 75 74 49 | 44 12 58 16 92 17 00 00 |\.AboutI|D.X.....|
|000031d0| 29 09 09 7b 46 55 4e 43 | 54 49 4f 4e 20 77 69 6c |)..{FUNC|TION wil|
|000031e0| 6c 20 65 78 65 63 75 74 | 65 64 20 75 6e 74 69 6c |l execut|ed until|
|000031f0| 20 27 4f 4b 27 20 68 69 | 74 7d 9a 01 98 01 92 22 | 'OK' hi|t}....."|
|00003200| 00 01 3e 7b 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |..>{====|========|
|00003210| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003220| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003230| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003240| 7d 75 94 01 92 22 00 01 | 3e 7b 3d 3d 3d 3d 3d 3d |}u..."..|>{======|
|00003250| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003260| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003270| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003280| 3d 3d 3d 3d 3d 3d 7d 20 | b0 11 32 da 00 00 00 00 |======} |..2.....|
|00003290| 09 44 6f 43 6f 6d 6d 61 | 6e 64 81 00 35 38 32 ba |.DoComma|nd..582.|
|000032a0| 01 00 32 ae 06 9e 00 07 | 00 04 a8 01 7c 0b 00 00 |..2.....|....|...|
|000032b0| 33 26 07 6d 52 65 73 75 | 6c 74 16 00 32 c6 00 00 |3&.mResu|lt..2...|
|000032c0| 00 08 a6 01 7c 0b 40 00 | 00 3f 07 6c 6f 6e 67 49 |....|.@.|.?.longI|
|000032d0| 6e 74 00 00 00 00 00 00 | 00 00 aa 01 98 01 92 21 |nt......|.......!|
|000032e0| 00 01 3d 7b 45 78 65 63 | 75 74 65 20 69 74 65 6d |..={Exec|ute item|
|000032f0| 20 73 70 65 63 69 66 69 | 65 64 20 62 79 20 4d 52 | specifi|ed by MR|
|00003300| 65 73 75 6c 74 2c 20 74 | 68 65 20 72 65 73 75 6c |esult, t|he resul|
|00003310| 74 20 6f 66 20 4d 65 6e | 75 53 65 6c 65 63 74 7d |t of Men|uSelect}|
|00003320| 94 01 ba 01 7c 0b 33 ea | 33 8a 07 74 68 65 49 74 |....|.3.|3..theIt|
|00003330| 65 6d 12 00 33 3e ff ee | 33 2a a6 01 7c 0b 40 00 |em..3>..|3*..|.@.|
|00003340| 00 2f 07 69 6e 74 65 67 | 65 72 00 00 00 00 00 00 |./.integ|er......|
|00003350| 00 00 98 01 92 1a 00 00 | 2f 09 09 7b 6d 65 6e 75 |........|/..{menu|
|00003360| 20 69 74 65 6d 20 6e 75 | 6d 62 65 72 20 66 6f 72 | item nu|mber for|
|00003370| 20 6d 52 65 73 75 6c 74 | 20 6c 6f 77 2d 6f 72 64 | mResult| low-ord|
|00003380| 65 72 20 77 6f 72 64 7d | 7c 0b 00 00 34 ce 07 74 |er word}||...4..t|
|00003390| 68 65 4d 65 6e 75 12 00 | 33 a2 ff ec 33 8e a6 01 |heMenu..|3...3...|
|000033a0| 7c 0b 40 00 00 2f 07 69 | 6e 74 65 67 65 72 00 00 ||.@../.i|nteger..|
|000033b0| 00 00 00 00 00 00 98 01 | 92 18 00 00 2b 09 09 7b |........|....+..{|
|000033c0| 6d 65 6e 75 20 6e 75 6d | 62 65 72 20 66 6f 72 20 |menu num|ber for |
|000033d0| 6d 52 65 73 75 6c 74 20 | 68 69 67 68 2d 6f 72 64 |mResult |high-ord|
|000033e0| 65 72 20 77 6f 72 64 7d | 7c 0a 34 66 34 36 04 6e |er word}||.4f46.n|
|000033f0| 61 6d 65 08 12 00 34 00 | fe ec 33 ee a6 01 7c 0b |ame...4.|..3...|.|
|00003400| 40 00 05 1d 06 53 74 72 | 32 35 35 08 00 00 00 00 |@....Str|255.....|
|00003410| 00 00 00 00 98 01 92 0f | 00 00 18 09 09 09 7b 64 |........|......{d|
|00003420| 65 73 6b 20 61 63 63 65 | 73 73 6f 72 79 20 6e 61 |esk acce|ssory na|
|00003430| 6d 65 7d 06 7c 0a 00 00 | 00 00 04 74 65 6d 70 08 |me}.|...|...temp.|
|00003440| 12 00 34 4c fe ea 34 3a | a6 01 7c 0b 40 00 00 2f |..4L..4:|..|.@../|
|00003450| 07 69 6e 74 65 67 65 72 | 00 00 00 00 00 00 00 00 |.integer|........|
|00003460| 98 01 94 01 7c 0c 00 00 | 00 00 09 6d 79 57 69 6e |....|...|...myWin|
|00003470| 50 65 65 6b 12 00 34 80 | fe e6 34 6a a6 01 7c 0d |Peek..4.|..4j..|.|
|00003480| 40 00 47 75 0a 57 69 6e | 64 6f 77 50 65 65 6b 08 |@.Gu.Win|dowPeek.|
|00003490| 00 00 00 00 00 00 00 00 | 98 01 92 19 00 00 2c 09 |........|......,.|
|000034a0| 7b 74 65 6d 70 20 76 61 | 72 69 61 62 6c 65 20 66 |{temp va|riable f|
|000034b0| 6f 72 20 75 73 61 67 65 | 20 66 6f 72 20 74 79 70 |or usage| for typ|
|000034c0| 65 20 63 6f 65 72 63 69 | 6f 6e 7d 45 7c 0d 00 00 |e coerci|on}E|...|
|000034d0| 00 00 0a 74 68 65 57 69 | 6e 4b 69 6e 64 08 12 00 |...theWi|nKind...|
|000034e0| 34 ea fe e4 34 d2 a6 01 | 7c 0b 40 00 00 2f 07 69 |4...4...||.@../.i|
|000034f0| 6e 74 65 67 65 72 00 00 | 00 00 00 00 00 00 98 01 |nteger..|........|
|00003500| 92 1a 00 00 2e 09 09 09 | 7b 74 65 6d 70 20 76 61 |........|{temp va|
|00003510| 72 69 61 62 6c 65 20 66 | 6f 72 20 75 73 61 67 65 |riable f|or usage|
|00003520| 20 66 6f 72 20 74 79 70 | 65 20 63 6f 65 72 63 69 | for typ|e coerci|
|00003530| 6f 6e 7d 6c 94 01 94 01 | 7e 03 3e de 40 94 80 10 |on}l....|~.>.@...|
|00003540| 5c 07 74 68 65 49 74 65 | 6d 0a 5c 06 4c 6f 57 6f |\.theIte|m.\.LoWo|
|00003550| 72 64 10 5c 07 6d 52 65 | 73 75 6c 74 16 08 98 01 |rd.\.mRe|sult....|
|00003560| 92 17 00 00 28 09 09 7b | 63 61 6c 6c 20 54 6f 6f |....(..{|call Too|
|00003570| 6c 62 6f 78 20 75 74 69 | 6c 69 74 79 20 72 6f 75 |lbox uti|lity rou|
|00003580| 74 69 6e 65 73 20 74 6f | 20 73 65 74 7d 5c 80 10 |tines to| set}\..|
|00003590| 5c 07 74 68 65 4d 65 6e | 75 0a 5c 06 68 69 57 6f |\.theMen|u.\.hiWo|
|000035a0| 72 64 10 5c 07 6d 52 65 | 73 75 6c 74 16 08 98 01 |rd.\.mRe|sult....|
|000035b0| 92 15 00 00 24 09 09 7b | 6d 65 6e 75 20 69 74 65 |....$..{|menu ite|
|000035c0| 6d 20 6e 75 6d 62 65 72 | 20 61 6e 64 20 6d 65 6e |m number| and men|
|000035d0| 75 20 6e 75 6d 62 65 72 | 7d 20 94 01 88 0f 40 36 |u number|} ....@6|
|000035e0| 00 00 00 08 15 80 00 00 | 00 00 00 00 00 00 00 5c |........|.......\|
|000035f0| 07 74 68 65 4d 65 6e 75 | 6c 08 92 0e 00 00 16 20 |.theMenu|l...... |
|00003600| 09 09 09 09 7b 63 61 73 | 65 20 6f 6e 20 6d 65 6e |....{cas|e on men|
|00003610| 75 20 49 44 7d 1c 94 01 | 92 07 00 01 09 7b 3d 3d |u ID}...|.....{==|
|00003620| 3d 3d 3d 3d 3d 7d 7c 0b | 00 00 08 8e 07 61 70 70 |=====}|.|.....app|
|00003630| 6c 65 49 44 39 00 00 02 | 00 00 00 00 a6 01 86 0c |leID9...|........|
|00003640| 5c 07 74 68 65 49 74 65 | 6d 44 5c 09 61 62 6f 75 |\.theIte|mD\.abou|
|00003650| 74 49 74 65 6d 08 7c 0d | 00 00 00 00 0b 44 6f 41 |tItem.|.|.....DoA|
|00003660| 70 70 6c 65 4d 65 6e 75 | 00 00 00 00 00 00 00 00 |ppleMenu|........|
|00003670| 92 1a 00 00 2f 09 09 7b | 2a 2a 2a 20 41 44 44 45 |..../..{|*** ADDE|
|00003680| 44 20 54 4f 20 54 52 59 | 20 55 53 45 20 4e 45 57 |D TO TRY| USE NEW|
|00003690| 20 27 41 4c 45 52 54 27 | 20 4d 45 54 48 4f 44 20 | 'ALERT'| METHOD |
|000036a0| 2a 2a 2a 7d 92 19 00 01 | 2c 7b 44 6f 41 62 6f 75 |***}....|,{DoAbou|
|000036b0| 74 42 6f 78 20 20 2a 2a | 2a 20 4f 52 49 47 49 4e |tBox  **|* ORIGIN|
|000036c0| 41 4c 20 53 68 6f 77 4f | 66 66 20 43 4f 44 45 20 |AL ShowO|ff CODE |
|000036d0| 4c 49 4e 45 7d 7d 96 01 | 7e 03 00 00 38 ce 84 18 |LINE}}..|~...8...|
|000036e0| 07 47 65 74 49 74 65 6d | 10 5c 07 6d 79 4d 65 6e |.GetItem|.\.myMen|
|000036f0| 75 73 18 5c 06 61 70 70 | 6c 65 4d 1c 12 5c 07 74 |us.\.app|leM..\.t|
|00003700| 68 65 49 74 65 6d 12 5c | 04 6e 61 6d 65 16 98 01 |heItem.\|.name...|
|00003710| 92 23 00 01 40 7b 47 65 | 74 50 6f 72 74 20 28 73 |.#..@{Ge|tPort (s|
|00003720| 61 76 65 64 50 6f 72 74 | 29 3b 09 09 09 54 48 49 |avedPort|);...THI|
|00003730| 53 20 49 53 20 54 48 45 | 20 57 41 59 20 49 54 20 |S IS THE| WAY IT |
|00003740| 57 41 53 20 20 49 4e 20 | 54 48 45 20 4f 52 49 47 |WAS  IN |THE ORIG|
|00003750| 49 4e 41 4c 7d 45 80 0c | 5c 08 73 63 72 61 70 45 |INAL}E..|\.scrapE|
|00003760| 72 72 0a 5c 09 5a 65 72 | 6f 53 63 72 61 70 98 01 |rr.\.Zer|oScrap..|
|00003770| 80 0d 5c 0a 73 63 72 43 | 6f 70 79 45 72 72 0a 5c |..\.scrC|opyErr.\|
|00003780| 09 54 45 54 6f 53 63 72 | 61 70 98 01 80 0f 5c 04 |.TEToScr|ap....\.|
|00003790| 74 65 6d 70 0a 5c 0b 4f | 70 65 6e 44 65 73 6b 41 |temp.\.O|penDeskA|
|000037a0| 63 63 10 5c 04 6e 61 6d | 65 16 98 01 84 14 0a 45 |cc.\.nam|e......E|
|000037b0| 6e 61 62 6c 65 49 74 65 | 6d 10 5c 07 6d 79 4d 65 |nableIte|m.\.myMe|
|000037c0| 6e 75 73 18 5c 05 65 64 | 69 74 4d 1c 12 08 5a 03 |nus.\.ed|itM...Z.|
|000037d0| 00 00 16 08 98 01 92 22 | 00 01 3e 7b 53 65 74 50 |......."|..>{SetP|
|000037e0| 6f 72 74 20 28 73 61 76 | 65 64 50 6f 72 74 29 3b |ort (sav|edPort);|
|000037f0| 09 09 54 48 49 53 20 49 | 53 20 54 48 45 20 57 41 |..THIS I|S THE WA|
|00003800| 59 20 49 54 20 57 41 53 | 20 49 4e 20 54 48 45 20 |Y IT WAS| IN THE |
|00003810| 4f 52 49 47 49 4e 41 4c | 7d 38 86 09 5c 0b 46 72 |ORIGINAL|}8..\.Fr|
|00003820| 6f 6e 74 57 69 6e 64 6f | 77 46 58 08 7e 03 00 00 |ontWindo|wFX.~...|
|00003830| 38 92 84 17 0a 45 6e 61 | 62 6c 65 49 74 65 6d 10 |8....Ena|bleItem.|
|00003840| 5c 07 6d 79 4d 65 6e 75 | 73 18 5c 05 66 69 6c 65 |\.myMenu|s.\.file|
|00003850| 4d 1c 12 5c 09 63 6c 6f | 73 65 49 74 65 6d 16 08 |M..\.clo|seItem..|
|00003860| 98 01 84 16 0a 45 6e 61 | 62 6c 65 49 74 65 6d 10 |.....Ena|bleItem.|
|00003870| 5c 07 6d 79 4d 65 6e 75 | 73 18 5c 05 65 64 69 74 |\.myMenu|s.\.edit|
|00003880| 4d 1c 12 5c 08 75 6e 64 | 6f 49 74 65 6d 16 98 01 |M..\.und|oItem...|
|00003890| 9a 01 98 01 92 11 00 00 | 1d 09 09 7b 69 66 20 46 |........|...{if F|
|000038a0| 72 6f 6e 74 57 69 6e 64 | 6f 77 20 74 68 65 6e 20 |rontWind|ow then |
|000038b0| 62 65 67 69 6e 7d 80 0a | 5c 07 6d 65 6e 75 73 4f |begin}..|\.menusO|
|000038c0| 4b 0a 5c 05 66 61 6c 73 | 65 08 98 01 9a 01 98 01 |K.\.fals|e.......|
|000038d0| 92 10 00 00 1b 09 09 7b | 69 66 20 74 68 65 49 74 |.......{|if theIt|
|000038e0| 65 6d 2e 2e 2e 65 6c 73 | 65 20 62 65 67 69 6e 7d |em...els|e begin}|
|000038f0| 94 01 92 07 00 01 09 7b | 3d 3d 3d 3d 3d 3d 3d 7d |.......{|=======}|
|00003900| 7c 0b 00 00 08 e6 06 66 | 69 6c 65 49 44 08 3d c2 ||......f|ileID.=.|
|00003910| 00 06 00 00 00 00 a6 01 | 88 0f 3d 9a 00 00 00 08 |........|..=.....|
|00003920| 15 80 00 00 00 00 00 00 | 00 00 00 5c 07 74 68 65 |........|...\.the|
|00003930| 49 74 65 6d 6c 08 94 01 | 7c 0b 00 00 0b 00 07 6e |Iteml...||......n|
|00003940| 65 77 49 74 65 6d 39 6e | 00 09 00 00 00 00 a6 01 |ewItem9n|........|
|00003950| 7c 0d 00 00 00 00 0a 4f | 70 65 6e 57 69 6e 64 6f ||......O|penWindo|
|00003960| 77 08 00 00 00 00 00 00 | 00 00 98 01 94 01 7c 0c |w.......|......|.|
|00003970| 00 00 0b 38 09 63 6c 6f | 73 65 49 74 65 6d 3c e6 |...8.clo|seItem<.|
|00003980| 00 0a 00 00 00 00 a6 01 | 7e 03 00 00 3c e4 94 01 |........|~...<...|
|00003990| 92 21 00 01 3c 7b 42 45 | 4c 4f 57 20 41 52 45 20 |.!..<{BE|LOW ARE |
|000039a0| 54 48 45 20 4f 52 49 47 | 49 4e 41 4c 20 53 54 41 |THE ORIG|INAL STA|
|000039b0| 54 45 4d 45 4e 54 53 20 | 57 48 49 43 48 20 4c 53 |TEMENTS |WHICH LS|
|000039c0| 50 20 57 4f 55 4c 44 4e | 27 54 20 41 4c 4c 4f 57 |P WOULDN|'T ALLOW|
|000039d0| 7d 48 92 19 00 01 2c 7b | 69 66 20 57 69 6e 64 6f |}H....,{|if Windo|
|000039e0| 77 50 65 65 6b 28 46 72 | 6f 6e 74 57 69 6e 64 6f |wPeek(Fr|ontWindo|
|000039f0| 77 29 5e 2e 77 69 6e 64 | 6f 77 4b 69 6e 64 20 3c |w)^.wind|owKind <|
|00003a00| 20 30 7d 01 92 23 00 01 | 40 7b 20 20 20 20 74 68 | 0}..#..|@{    th|
|00003a10| 65 6e 20 43 6c 6f 73 65 | 44 65 73 6b 41 63 63 20 |en Close|DeskAcc |
|00003a20| 28 77 69 6e 64 6f 77 50 | 65 65 6b 20 28 46 72 6f |(windowP|eek (Fro|
|00003a30| 6e 74 57 69 6e 64 6f 77 | 29 5e 2e 77 69 6e 64 6f |ntWindow|)^.windo|
|00003a40| 77 4b 69 6e 64 29 20 20 | 7d 00 94 01 92 1f 00 01 |wKind)  |}.......|
|00003a50| 39 7b 54 48 45 53 45 20 | 41 52 45 20 54 48 45 20 |9{THESE |ARE THE |
|00003a60| 46 49 58 45 44 20 53 54 | 41 54 45 4d 45 4e 54 53 |FIXED ST|ATEMENTS|
|00003a70| 2c 20 43 4f 45 52 43 45 | 44 20 49 4e 54 4f 20 41 |, COERCE|D INTO A|
|00003a80| 43 43 45 50 54 41 4e 43 | 45 7d 80 15 5c 09 6d 79 |CCEPTANC|E}..\.my|
|00003a90| 57 69 6e 50 65 65 6b 0a | 5c 0a 57 69 6e 64 6f 77 |WinPeek.|\.Window|
|00003aa0| 50 65 65 6b 10 5c 0b 46 | 72 6f 6e 74 57 69 6e 64 |Peek.\.F|rontWind|
|00003ab0| 6f 77 16 08 98 01 92 14 | 00 00 23 09 7b 73 70 65 |ow......|..#.{spe|
|00003ac0| 63 69 61 6c 20 63 6f 65 | 72 63 69 6f 6e 20 6f 66 |cial coe|rcion of|
|00003ad0| 20 74 79 70 65 73 20 74 | 6f 20 67 65 74 7d 80 14 | types t|o get}..|
|00003ae0| 5c 0a 74 68 65 57 69 6e | 4b 69 6e 64 0a 5c 09 6d |\.theWin|Kind.\.m|
|00003af0| 79 57 69 6e 50 65 65 6b | 54 52 5c 0a 57 69 6e 64 |yWinPeek|TR\.Wind|
|00003b00| 6f 77 4b 69 6e 64 98 01 | 92 10 00 00 1b 09 09 09 |owKind..|........|
|00003b10| 7b 61 72 6f 75 6e 64 20 | 4c 50 53 20 6c 69 6d 69 |{around |LPS limi|
|00003b20| 74 61 74 69 6f 6e 73 7d | 86 0a 5c 0a 74 68 65 57 |tations}|..\.theW|
|00003b30| 69 6e 6b 69 6e 64 48 08 | 5a 03 00 00 92 10 00 00 |inkindH.|Z.......|
|00003b40| 1a 09 09 09 09 09 09 09 | 7b 63 6f 65 72 63 65 64 |........|{coerced|
|00003b50| 20 73 74 61 74 65 6d 65 | 6e 74 7d 00 84 0f 0c 43 | stateme|nt}....C|
|00003b60| 6c 6f 73 65 44 65 73 6b | 41 63 63 10 5c 0a 74 68 |loseDesk|Acc.\.th|
|00003b70| 65 57 69 6e 4b 69 6e 64 | 16 08 92 16 00 00 27 09 |eWinKind|......'.|
|00003b80| 09 7b 69 66 20 69 74 27 | 73 20 61 20 64 65 73 6b |.{if it'|s a desk|
|00003b90| 20 61 63 63 20 77 69 6e | 64 6f 77 2c 20 63 6c 6f | acc win|dow, clo|
|00003ba0| 73 65 20 69 74 7d 94 01 | 96 01 7e 03 00 00 3c bc |se it}..|..~...<.|
|00003bb0| 92 1f 00 01 38 7b 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |....8{--|--------|
|00003bc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003bd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003be0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 7d 0f 92 17 |--------|----}...|
|00003bf0| 00 01 28 7b 54 48 49 53 | 20 49 53 20 54 48 45 20 |..({THIS| IS THE |
|00003c00| 43 4c 4f 53 45 20 57 49 | 4e 44 4f 57 53 20 42 55 |CLOSE WI|NDOWS BU|
|00003c10| 47 20 50 52 4f 42 4c 45 | 4d 20 7d 0c 92 20 00 01 |G PROBLE|M }.. ..|
|00003c20| 3b 7b 44 69 73 70 6f 73 | 65 57 69 6e 64 6f 77 28 |;{Dispos|eWindow(|
|00003c30| 46 72 6f 6e 74 57 69 6e | 64 6f 77 29 3b 09 09 7b |FrontWin|dow);..{|
|00003c40| 69 66 20 69 74 27 73 20 | 6d 69 6e 65 2c 20 62 6c |if it's |mine, bl|
|00003c50| 6f 77 20 69 74 20 61 77 | 61 79 21 7d 92 1f 00 01 |ow it aw|ay!}....|
|00003c60| 38 7b 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |8{------|--------|
|00003c70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003c80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003c90| 2d 2d 2d 2d 2d 2d 2d 2d | 7d 6d 94 01 84 0e 0a 4b |--------|}m.....K|
|00003ca0| 69 6c 6c 57 69 6e 64 6f | 77 10 5c 0b 46 72 6f 6e |illWindo|w.\.Fron|
|00003cb0| 74 57 69 6e 64 6f 77 16 | 98 01 9a 01 98 01 92 12 |tWindow.|........|
|00003cc0| 00 00 1e 09 09 7b 69 66 | 20 57 69 6e 64 6f 77 50 |.....{if| WindowP|
|00003cd0| 65 65 6b 2e 2e 2e 65 6c | 73 65 20 62 65 67 69 6e |eek...el|se begin|
|00003ce0| 7d f2 9a 01 98 01 7c 0c | 00 00 0b 54 08 71 75 69 |}.....|.|...T.qui|
|00003cf0| 74 49 74 65 6d 08 00 00 | 00 0d 00 00 00 00 a6 01 |tItem...|........|
|00003d00| 80 0a 5c 08 64 6f 6e 65 | 46 6c 61 67 0a 5c 04 54 |..\.done|Flag.\.T|
|00003d10| 72 75 65 08 98 01 92 0b | 00 00 10 09 09 7b 71 75 |rue.....|.....{qu|
|00003d20| 69 74 20 70 72 6f 67 72 | 61 6d 7d 19 9c 01 92 34 |it progr|am}....4|
|00003d30| 00 00 62 09 09 7b 61 64 | 64 65 64 20 74 6f 20 73 |..b..{ad|ded to s|
|00003d40| 61 74 69 73 66 79 20 4c | 69 67 68 74 53 70 65 65 |atisfy L|ightSpee|
|00003d50| 64 73 20 43 41 53 45 20 | 73 74 61 74 65 6d 65 6e |ds CASE |statemen|
|00003d60| 74 20 6e 65 65 64 73 2c | 20 61 76 6f 69 64 73 20 |t needs,| avoids |
|00003d70| 27 43 61 73 65 20 53 65 | 6c 65 63 74 6f 72 20 52 |'Case Se|lector R|
|00003d80| 61 6e 67 65 20 28 54 72 | 61 70 20 34 29 27 20 65 |ange (Tr|ap 4)' e|
|00003d90| 72 72 6f 72 7d 00 94 01 | 9a 01 98 01 92 0b 00 00 |rror}...|........|
|00003da0| 10 09 09 7b 63 61 73 65 | 20 74 68 65 49 74 65 6d |...{case| theItem|
|00003db0| 7d 00 94 01 92 07 00 01 | 09 7b 3d 3d 3d 3d 3d 3d |}.......|.{======|
|00003dc0| 3d 7d 7c 0b 00 00 09 00 | 06 65 64 69 74 49 44 08 |=}|.....|.editID.|
|00003dd0| 00 00 00 0e 00 00 00 00 | a6 01 7e 03 00 00 3f b0 |........|..~...?.|
|00003de0| 86 10 24 5c 0a 53 79 73 | 74 65 6d 45 64 69 74 10 |..$\.Sys|temEdit.|
|00003df0| 5c 07 74 68 65 49 74 65 | 6d 3c 5a 03 00 01 16 08 |\.theIte|m<Z.....|
|00003e00| 88 0f 3f 96 00 00 00 08 | 15 80 00 00 00 00 00 00 |..?.....|........|
|00003e10| 00 00 00 5c 07 74 68 65 | 49 74 65 6d 6c 08 92 11 |...\.the|Iteml...|
|00003e20| 00 00 1d 20 09 09 7b 63 | 61 73 65 20 6f 6e 20 6d |... ..{c|ase on m|
|00003e30| 65 6e 75 20 69 74 65 6d | 20 6e 75 6d 62 65 72 7d |enu item| number}|
|00003e40| 94 01 7c 0b 00 00 0a 90 | 07 63 75 74 49 74 65 6d |..|.....|.cutItem|
|00003e50| 3e 96 00 12 00 00 00 00 | a6 01 84 09 05 54 45 43 |>.......|.....TEC|
|00003e60| 75 74 10 5c 05 74 65 78 | 74 48 16 08 98 01 92 13 |ut.\.tex|tH......|
|00003e70| 00 00 20 09 09 7b 63 61 | 6c 6c 20 54 65 78 74 45 |.. ..{ca|ll TextE|
|00003e80| 64 69 74 20 74 6f 20 68 | 61 6e 64 6c 65 20 49 74 |dit to h|andle It|
|00003e90| 65 6d 7d 6f 94 01 7c 0c | 00 00 0a ac 08 63 6f 70 |em}o..|.|.....cop|
|00003ea0| 79 49 74 65 6d 08 3e c6 | 00 13 00 00 00 00 a6 01 |yItem.>.|........|
|00003eb0| 84 09 06 54 45 43 6f 70 | 79 10 5c 05 74 65 78 74 |...TECop|y.\.text|
|00003ec0| 48 16 98 01 94 01 7c 0c | 00 00 0a c8 09 50 61 73 |H.....|.|.....Pas|
|00003ed0| 74 65 49 74 65 6d 3e f8 | 00 14 00 00 00 00 a6 01 |teItem>.|........|
|00003ee0| 84 0a 07 54 45 50 61 73 | 74 65 10 5c 05 74 65 78 |...TEPas|te.\.tex|
|00003ef0| 74 48 16 08 98 01 94 01 | 7c 0c 00 00 0a e4 09 63 |tH......||......c|
|00003f00| 6c 65 61 72 49 74 65 6d | 00 00 00 15 00 00 00 00 |learItem|........|
|00003f10| a6 01 84 0a 08 54 45 44 | 65 6c 65 74 65 10 5c 05 |.....TED|elete.\.|
|00003f20| 74 65 78 74 48 16 98 01 | 94 01 9c 01 92 34 00 00 |textH...|.....4..|
|00003f30| 62 09 09 7b 61 64 64 65 | 64 20 74 6f 20 73 61 74 |b..{adde|d to sat|
|00003f40| 69 73 66 79 20 4c 69 67 | 68 74 53 70 65 65 64 73 |isfy Lig|htSpeeds|
|00003f50| 20 43 41 53 45 20 73 74 | 61 74 65 6d 65 6e 74 20 | CASE st|atement |
|00003f60| 6e 65 65 64 73 2c 20 61 | 76 6f 69 64 73 20 27 43 |needs, a|voids 'C|
|00003f70| 61 73 65 20 53 65 6c 65 | 63 74 6f 72 20 52 61 6e |ase Sele|ctor Ran|
|00003f80| 67 65 20 28 54 72 61 70 | 20 34 29 27 20 65 72 72 |ge (Trap| 4)' err|
|00003f90| 6f 72 7d 61 9a 01 98 01 | 92 0b 00 00 10 09 09 7b |or}a....|.......{|
|00003fa0| 63 61 73 65 20 74 68 65 | 49 74 65 6d 7d 73 9a 01 |case the|Item}s..|
|00003fb0| 98 01 92 0b 00 00 10 09 | 09 7b 65 64 69 74 49 44 |........|.{editID|
|00003fc0| 20 62 65 67 69 6e 7d 03 | 9c 01 92 34 00 00 62 09 | begin}.|...4..b.|
|00003fd0| 09 7b 61 64 64 65 64 20 | 74 6f 20 73 61 74 69 73 |.{added |to satis|
|00003fe0| 66 79 20 4c 69 67 68 74 | 53 70 65 65 64 73 20 43 |fy Light|Speeds C|
|00003ff0| 41 53 45 20 73 74 61 74 | 65 6d 65 6e 74 20 6e 65 |ASE stat|ement ne|
|00004000| 65 64 73 2c 20 61 76 6f | 69 64 73 20 27 43 61 73 |eds, avo|ids 'Cas|
|00004010| 65 20 53 65 6c 65 63 74 | 6f 72 20 52 61 6e 67 65 |e Select|or Range|
|00004020| 20 28 54 72 61 70 20 34 | 29 27 20 65 72 72 6f 72 | (Trap 4|)' error|
|00004030| 7d 50 94 01 9a 01 98 01 | 92 0b 00 00 10 09 09 7b |}P......|.......{|
|00004040| 63 61 73 65 20 74 68 65 | 4d 65 6e 75 7d 3c 84 0a |case the|Menu}<..|
|00004050| 0a 48 69 6c 69 74 65 4d | 65 6e 75 10 5a 03 00 00 |.HiliteM|enu.Z...|
|00004060| 16 08 98 01 92 17 00 00 | 28 09 09 09 09 7b 75 6e |........|(....{un|
|00004070| 68 69 6c 69 74 65 20 74 | 68 65 20 6d 65 6e 75 20 |hilite t|he menu |
|00004080| 77 68 69 63 68 20 77 61 | 73 20 61 63 74 69 76 65 |which wa|s active|
|00004090| 7d 06 9a 01 98 01 92 0e | 00 00 17 09 09 7b 70 72 |}.......|.....{pr|
|000040a0| 6f 63 65 64 75 72 65 20 | 44 6f 43 6f 6d 6d 61 6e |ocedure |DoComman|
|000040b0| 64 7d 92 22 00 01 3e 7b | 3d 3d 3d 3d 3d 3d 3d 3d |d}."..>{|========|
|000040c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000040d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000040e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000040f0| 3d 3d 3d 3d 7d 00 94 01 | 92 22 00 01 3e 7b 3d 3d |====}...|."..>{==|
|00004100| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004110| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004120| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004130| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 7d 00 b0 11 3f 92 |========|==}...?.|
|00004140| 00 00 00 00 09 46 69 78 | 43 75 72 73 6f 72 81 00 |.....Fix|Cursor..|
|00004150| 41 f0 00 00 01 00 41 66 | 06 9e 00 08 00 00 98 01 |A.....Af|........|
|00004160| 94 01 ba 01 7c 0c 00 00 | 41 96 08 6d 6f 75 73 65 |....|...|A..mouse|
|00004170| 4c 6f 63 08 12 00 41 80 | ff ec 41 6a a6 01 7c 0a |Loc...A.|..Aj..|.|
|00004180| 40 00 0a e7 05 70 6f 69 | 6e 74 00 00 00 00 00 00 |@....poi|nt......|
|00004190| 00 00 98 01 7c 0c 00 00 | 00 00 08 6d 79 43 75 72 |....|...|...myCur|
|000041a0| 73 6f 72 08 12 00 41 b0 | ff e8 41 9a a6 01 7c 0d |sor...A.|..A...|.|
|000041b0| 40 00 43 c3 0a 43 75 72 | 73 48 61 6e 64 6c 65 08 |@.C..Cur|sHandle.|
|000041c0| 00 00 00 00 00 00 00 00 | 98 01 92 12 00 00 1e 09 |........|........|
|000041d0| 09 7b 74 65 6d 70 20 72 | 65 67 69 73 74 65 72 20 |.{temp r|egister |
|000041e0| 66 6f 72 20 63 6f 65 72 | 63 69 6f 6e 7d 00 94 01 |for coer|cion}...|
|000041f0| 7e 03 42 a2 43 f8 84 0c | 08 47 65 74 4d 6f 75 73 |~.B.C...|.GetMous|
|00004200| 65 10 5c 08 6d 6f 75 73 | 65 4c 6f 63 16 08 98 01 |e.\.mous|eLoc....|
|00004210| 86 17 5c 08 50 74 49 6e | 52 65 63 74 10 5c 08 6d |..\.PtIn|Rect.\.m|
|00004220| 6f 75 73 65 4c 6f 63 12 | 5c 07 74 68 65 50 6f 72 |ouseLoc.|\.thePor|
|00004230| 74 54 52 5c 08 70 6f 72 | 74 52 65 63 74 16 94 01 |tTR\.por|tRect...|
|00004240| 92 20 00 01 3a 7b 42 45 | 4c 4f 57 20 49 53 20 54 |. ..:{BE|LOW IS T|
|00004250| 48 45 20 4f 52 49 47 49 | 4e 41 4c 20 53 54 41 54 |HE ORIGI|NAL STAT|
|00004260| 45 4d 45 4e 54 20 57 48 | 49 43 48 20 4c 53 50 20 |EMENT WH|ICH LSP |
|00004270| 57 4f 55 4c 44 4e 27 54 | 20 41 4c 4c 4f 57 7d 3a |WOULDN'T| ALLOW}:|
|00004280| 92 2c 00 01 52 7b 53 65 | 74 43 75 72 73 6f 72 20 |.,..R{Se|tCursor |
|00004290| 28 20 47 65 74 43 75 72 | 73 6f 72 20 28 20 69 42 |( GetCur|sor ( iB|
|000042a0| 65 61 6d 43 75 72 73 6f | 72 20 29 20 5e 20 5e 20 |eamCurso|r ) ^ ^ |
|000042b0| 29 09 09 7b 52 45 54 55 | 52 4e 45 44 20 27 54 48 |)..{RETU|RNED 'TH|
|000042c0| 49 53 20 44 4f 45 53 4e | 27 54 20 4d 41 4b 45 20 |IS DOESN|'T MAKE |
|000042d0| 53 45 4e 53 45 27 7d 00 | 94 01 92 1f 00 01 39 7b |SENSE'}.|......9{|
|000042e0| 54 48 45 53 45 20 41 52 | 45 20 54 48 45 20 46 49 |THESE AR|E THE FI|
|000042f0| 58 45 44 20 53 54 41 54 | 45 4d 45 4e 54 53 2c 20 |XED STAT|EMENTS, |
|00004300| 43 4f 45 52 43 45 44 20 | 49 4e 54 4f 20 41 43 43 |COERCED |INTO ACC|
|00004310| 45 50 54 41 4e 43 45 7d | 7e 03 00 00 43 b4 80 14 |EPTANCE}|~...C...|
|00004320| 5c 08 6d 79 43 75 72 73 | 6f 72 0a 5c 09 47 65 74 |\.myCurs|or.\.Get|
|00004330| 43 75 72 73 6f 72 10 5c | 0b 69 42 65 61 6d 43 75 |Cursor.\|.iBeamCu|
|00004340| 72 73 6f 72 16 08 98 01 | 92 14 00 00 22 09 09 7b |rsor....|...."..{|
|00004350| 61 64 64 65 64 20 66 6f | 72 20 50 61 73 63 61 6c |added fo|r Pascal|
|00004360| 20 74 79 70 65 20 63 6f | 65 72 63 69 6f 6e 7d 20 | type co|ercion} |
|00004370| 84 0d 09 53 65 74 43 75 | 72 73 6f 72 10 5c 08 6d |...SetCu|rsor.\.m|
|00004380| 79 43 75 72 73 6f 72 54 | 54 16 92 13 00 00 20 09 |yCursorT|T..... .|
|00004390| 09 7b 63 6f 65 72 63 65 | 64 20 69 6e 74 6f 20 77 |.{coerce|d into w|
|000043a0| 6f 72 6b 69 6e 67 20 69 | 6e 20 4c 53 50 20 7d 03 |orking i|n LSP }.|
|000043b0| 9a 01 94 01 96 01 84 0b | 09 53 65 74 43 75 72 73 |........|.SetCurs|
|000043c0| 6f 72 10 5c 05 61 72 72 | 6f 77 16 08 98 01 92 14 |or.\.arr|ow......|
|000043d0| 00 00 23 09 09 7b 6d 61 | 6b 65 20 74 68 65 20 63 |..#..{ma|ke the c|
|000043e0| 75 72 73 6f 72 20 61 6e | 20 61 72 72 6f 77 20 61 |ursor an| arrow a|
|000043f0| 67 61 69 6e 20 7d 9a 01 | 98 01 92 0e 00 00 17 09 |gain }..|........|
|00004400| 09 7b 70 72 6f 63 65 64 | 75 72 65 20 46 69 78 43 |.{proced|ure FixC|
|00004410| 75 72 73 6f 72 7d 92 22 | 00 01 3e 7b 3d 3d 3d 3d |ursor}."|..>{====|
|00004420| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004430| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004440| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004450| 3d 3d 3d 3d 3d 3d 3d 3d | 7d d0 94 01 92 22 00 01 |========|}...."..|
|00004460| 3e 7b 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |>{======|========|
|00004470| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004480| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004490| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 7d 4c |========|======}L|
|000044a0| 92 0c 00 01 12 7b 09 09 | 09 4d 41 49 4e 20 50 52 |.....{..|.MAIN PR|
|000044b0| 4f 47 52 41 4d 20 7d 00 | 92 22 00 01 3e 7b 3d 3d |OGRAM }.|."..>{==|
|000044c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000044d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000044e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000044f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 7d ba 94 01 94 01 |========|==}.....|
|00004500| 7e 03 00 00 64 2c 92 0e | 00 00 16 09 09 09 7b 74 |~...d,..|......{t|
|00004510| 68 65 20 6d 61 69 6e 20 | 70 72 6f 67 72 61 6d 20 |he main |program |
|00004520| 7d 3d 94 01 94 01 92 28 | 00 01 4a 7b 49 6e 69 74 |}=.....(|..J{Init|
|00004530| 47 72 61 66 28 40 74 68 | 65 50 6f 72 74 29 3b 09 |Graf(@th|ePort);.|
|00004540| 09 7b 4c 69 67 68 74 53 | 70 65 65 64 20 69 6e 69 |.{LightS|peed ini|
|00004550| 74 69 61 6c 69 7a 65 73 | 20 74 68 65 73 65 20 66 |tializes| these f|
|00004560| 6f 72 20 79 6f 75 20 61 | 75 74 6f 6d 61 74 69 63 |or you a|utomatic|
|00004570| 61 6c 6c 79 7d c4 92 09 | 00 01 0c 7b 49 6e 69 74 |ally}...|...{Init|
|00004580| 46 6f 6e 74 73 3b 7d 96 | 92 0a 00 01 0e 7b 49 6e |Fonts;}.|.....{In|
|00004590| 69 74 57 69 6e 64 6f 77 | 73 3b 7d be 92 09 00 01 |itWindow|s;}.....|
|000045a0| 0c 7b 49 6e 69 74 4d 65 | 6e 75 73 3b 7d 58 92 07 |.{InitMe|nus;}X..|
|000045b0| 00 01 09 7b 54 45 49 6e | 69 74 3b 7d 92 0c 00 01 |...{TEIn|it;}....|
|000045c0| 13 7b 49 6e 69 74 44 69 | 61 6c 6f 67 73 28 6e 69 |.{InitDi|alogs(ni|
|000045d0| 6c 29 3b 7d 7c 0d 00 00 | 00 00 0a 49 6e 69 74 43 |l);}|...|...InitC|
|000045e0| 75 72 73 6f 72 08 00 00 | 00 00 00 00 00 00 98 01 |ursor...|........|
|000045f0| 92 21 00 00 3c 09 09 09 | 09 7b 4e 45 45 44 20 54 |.!..<...|.{NEED T|
|00004600| 4f 20 49 4e 49 54 20 54 | 48 49 53 20 4f 4e 45 2c |O INIT T|HIS ONE,|
|00004610| 20 45 56 45 4e 20 54 48 | 4f 55 47 48 20 4c 53 50 | EVEN TH|OUGH LSP|
|00004620| 20 53 41 59 53 20 49 54 | 20 44 4f 45 53 20 49 54 | SAYS IT| DOES IT|
|00004630| 7d 79 94 01 84 11 0b 46 | 6c 75 73 68 45 76 65 6e |}y.....F|lushEven|
|00004640| 74 73 10 5c 0a 65 76 65 | 72 79 45 76 65 6e 74 12 |ts.\.eve|ryEvent.|
|00004650| 5a 03 00 00 16 08 98 01 | 94 01 7c 0d 00 00 00 00 |Z.......|..|.....|
|00004660| 0a 53 65 74 55 70 4d 65 | 6e 75 73 08 00 00 00 00 |.SetUpMe|nus.....|
|00004670| 00 00 00 00 98 01 90 0c | 5c 0a 73 63 72 65 65 6e |........|\.screen|
|00004680| 42 69 74 73 52 5c 06 62 | 6f 75 6e 64 73 08 84 1f |BitsR\.b|ounds...|
|00004690| 07 53 65 74 52 65 63 74 | 10 5c 08 64 72 61 67 52 |.SetRect|.\.dragR|
|000046a0| 65 63 74 12 5a 03 00 04 | 12 08 5a 03 00 18 12 5c |ect.Z...|..Z....\|
|000046b0| 05 72 69 67 68 74 3c 08 | 5a 03 00 04 12 5c 06 62 |.right<.|Z....\.b|
|000046c0| 6f 74 74 6f 6d 3c 5a 03 | 00 04 16 08 98 01 80 0a |ottom<Z.|........|
|000046d0| 5c 08 64 6f 6e 65 46 6c | 61 67 0a 5c 05 66 61 6c |\.doneFl|ag.\.fal|
|000046e0| 73 65 98 01 94 01 80 0a | 5c 07 6d 65 6e 75 73 4f |se......|\.menusO|
|000046f0| 4b 0a 5c 05 66 61 6c 73 | 65 08 98 01 80 09 5c 08 |K.\.fals|e.....\.|
|00004700| 6e 65 78 74 57 4e 75 6d | 0a 08 5a 03 00 01 98 01 |nextWNum|..Z.....|
|00004710| 92 11 00 00 1c 09 09 7b | 69 6e 69 74 69 61 6c 69 |.......{|initiali|
|00004720| 7a 65 20 77 69 6e 64 6f | 77 20 6e 75 6d 62 65 72 |ze windo|w number|
|00004730| 7d 09 84 21 07 53 65 74 | 52 65 63 74 10 5c 09 6e |}..!.Set|Rect.\.n|
|00004740| 65 78 74 57 52 65 63 74 | 12 5c 08 6c 65 66 74 45 |extWRect|.\.leftE|
|00004750| 64 67 65 12 5c 07 74 6f | 70 45 64 67 65 12 5c 09 |dge.\.to|pEdge.\.|
|00004760| 72 69 67 68 74 45 64 67 | 65 12 5c 07 62 6f 74 45 |rightEdg|e.\.botE|
|00004770| 64 67 65 16 98 01 92 14 | 00 00 22 09 09 7b 69 6e |dge.....|.."..{in|
|00004780| 69 74 61 6c 69 7a 65 20 | 74 68 65 20 77 69 6e 64 |italize |the wind|
|00004790| 6f 77 20 72 65 63 74 61 | 6e 67 6c 65 7d 72 94 01 |ow recta|ngle}r..|
|000047a0| 7c 0d 00 00 00 00 0a 4f | 70 65 6e 57 69 6e 64 6f ||......O|penWindo|
|000047b0| 77 08 00 00 00 00 00 00 | 00 00 98 01 92 12 00 00 |w.......|........|
|000047c0| 1e 09 09 7b 73 74 61 72 | 74 20 77 69 74 68 20 6f |...{star|t with o|
|000047d0| 6e 65 20 6f 70 65 6e 20 | 77 69 6e 64 6f 77 7d 12 |ne open |window}.|
|000047e0| 94 01 92 07 00 01 09 7b | 3d 3d 3d 3d 3d 3d 3d 7d |.......{|=======}|
|000047f0| 92 0b 00 01 11 7b 4d 61 | 69 6e 20 65 76 65 6e 74 |.....{Ma|in event|
|00004800| 20 6c 6f 6f 70 7d 94 01 | 8c 02 64 28 7c 0d 00 00 | loop}..|..d(|...|
|00004810| 00 00 0a 53 79 73 74 65 | 6d 54 61 73 6b 08 00 00 |...Syste|mTask...|
|00004820| 00 00 00 00 00 00 98 01 | 86 09 5c 0b 46 72 6f 6e |........|..\.Fron|
|00004830| 74 57 69 6e 64 6f 77 46 | 58 08 92 16 00 00 26 09 |tWindowF|X.....&.|
|00004840| 09 7b 69 66 20 74 68 65 | 72 65 20 69 73 20 69 6e |.{if the|re is in|
|00004850| 64 65 65 64 20 61 20 77 | 69 6e 64 6f 77 20 61 63 |deed a w|indow ac|
|00004860| 74 69 76 65 7d 00 94 01 | 92 20 00 01 3a 7b 42 45 |tive}...|. ..:{BE|
|00004870| 4c 4f 57 20 49 53 20 54 | 48 45 20 4f 52 49 47 49 |LOW IS T|HE ORIGI|
|00004880| 4e 41 4c 20 53 54 41 54 | 45 4d 45 4e 54 20 57 48 |NAL STAT|EMENT WH|
|00004890| 49 43 48 20 4c 53 50 20 | 57 4f 55 4c 44 4e 27 54 |ICH LSP |WOULDN'T|
|000048a0| 20 41 4c 4c 4f 57 7d e6 | 92 1a 00 01 2f 7b 69 66 | ALLOW}.|..../{if|
|000048b0| 20 57 69 6e 64 6f 77 50 | 65 65 6b 20 28 46 72 6f | WindowP|eek (Fro|
|000048c0| 6e 74 57 69 6e 64 6f 77 | 29 5e 2e 77 69 6e 64 6f |ntWindow|)^.windo|
|000048d0| 77 4b 69 6e 64 20 3e 3d | 20 30 20 7d 94 01 92 1f |wKind >=| 0 }....|
|000048e0| 00 01 39 7b 54 48 45 53 | 45 20 41 52 45 20 54 48 |..9{THES|E ARE TH|
|000048f0| 45 20 46 49 58 45 44 20 | 53 54 41 54 45 4d 45 4e |E FIXED |STATEMEN|
|00004900| 54 53 2c 20 43 4f 45 52 | 43 45 44 20 49 4e 54 4f |TS, COER|CED INTO|
|00004910| 20 41 43 43 45 50 54 41 | 4e 43 45 7d 7e 03 00 00 | ACCEPTA|NCE}~...|
|00004920| 4a 42 92 07 00 00 09 09 | 09 7b 41 44 44 45 44 7d |JB......|.{ADDED}|
|00004930| 80 15 5c 09 6d 79 57 69 | 6e 50 65 65 6b 0a 5c 0a |..\.myWi|nPeek.\.|
|00004940| 57 69 6e 64 6f 77 50 65 | 65 6b 10 5c 0b 46 72 6f |WindowPe|ek.\.Fro|
|00004950| 6e 74 57 69 6e 64 6f 77 | 16 08 98 01 92 15 00 00 |ntWindow|........|
|00004960| 24 09 09 7b 73 70 65 63 | 69 61 6c 20 63 6f 65 72 |$..{spec|ial coer|
|00004970| 63 69 6f 6e 20 6f 66 20 | 74 79 70 65 73 20 74 6f |cion of |types to|
|00004980| 20 67 65 74 7d 78 80 14 | 5c 0a 74 68 65 57 69 6e | get}x..|\.theWin|
|00004990| 4b 69 6e 64 0a 5c 09 6d | 79 57 69 6e 50 65 65 6b |Kind.\.m|yWinPeek|
|000049a0| 54 52 5c 0a 57 69 6e 64 | 6f 77 4b 69 6e 64 98 01 |TR\.Wind|owKind..|
|000049b0| 92 10 00 00 1b 09 09 09 | 7b 61 72 6f 75 6e 64 20 |........|{around |
|000049c0| 4c 50 53 20 6c 69 6d 69 | 74 61 74 69 6f 6e 73 7d |LPS limi|tations}|
|000049d0| 86 0a 5c 0a 74 68 65 57 | 69 6e 4b 69 6e 64 4e 08 |..\.theW|inKindN.|
|000049e0| 5a 03 00 00 92 20 00 00 | 3a 20 09 7b 69 66 20 69 |Z.... ..|: .{if i|
|000049f0| 74 27 73 20 6f 74 68 65 | 72 20 74 68 61 6e 20 61 |t's othe|r than a|
|00004a00| 20 64 65 73 6b 20 61 63 | 63 65 73 73 6f 72 79 2c | desk ac|cessory,|
|00004a10| 20 63 6f 65 72 63 65 64 | 20 73 74 61 74 65 6d 65 | coerced| stateme|
|00004a20| 6e 74 7d 6c 94 01 7c 0c | 00 00 00 00 09 46 69 78 |nt}l..|.|.....Fix|
|00004a30| 43 75 72 73 6f 72 00 00 | 00 00 00 00 00 00 98 01 |Cursor..|........|
|00004a40| 9a 01 98 01 92 07 00 00 | 09 09 09 7b 41 44 44 45 |........|...{ADDE|
|00004a50| 44 7d 86 0f 24 5c 07 6d | 65 6e 75 73 4f 4b 38 20 |D}..$\.m|enusOK8 |
|00004a60| 5c 0b 46 72 6f 6e 74 57 | 69 6e 64 6f 77 44 58 22 |\.FrontW|indowDX"|
|00004a70| 7e 03 00 00 4a e6 84 17 | 0b 44 69 73 61 62 6c 65 |~...J...|.Disable|
|00004a80| 49 74 65 6d 10 5c 07 6d | 79 4d 65 6e 75 73 18 5c |Item.\.m|yMenus.\|
|00004a90| 05 66 69 6c 65 4d 1c 12 | 5c 09 63 6c 6f 73 65 49 |.fileM..|\.closeI|
|00004aa0| 74 65 6d 16 98 01 84 14 | 0b 44 69 73 61 62 6c 65 |tem.....|.Disable|
|00004ab0| 49 74 65 6d 10 5c 07 6d | 79 4d 65 6e 75 73 18 5c |Item.\.m|yMenus.\|
|00004ac0| 05 65 64 69 74 4d 1c 12 | 5a 03 00 00 16 08 98 01 |.editM..|Z.......|
|00004ad0| 80 09 5c 07 6d 65 6e 75 | 73 4f 4b 0a 5c 04 74 72 |..\.menu|sOK.\.tr|
|00004ae0| 75 65 98 01 9a 01 98 01 | 92 13 00 00 20 20 09 09 |ue......|....  ..|
|00004af0| 7b 69 66 20 46 72 6f 6e | 74 57 69 6e 64 6f 77 2e |{if Fron|tWindow.|
|00004b00| 2e 2e 74 68 65 6e 20 62 | 65 67 69 6e 7d 12 92 1f |..then b|egin}...|
|00004b10| 00 01 38 7b 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..8{----|--------|
|00004b20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004b30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004b40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 7d 00 92 20 00 01 |--------|--}.. ..|
|00004b50| 3a 7b 54 48 49 53 20 49 | 53 20 54 48 45 20 27 4f |:{THIS I|S THE 'O|
|00004b60| 44 44 20 41 44 44 52 45 | 53 53 20 45 58 43 45 50 |DD ADDRE|SS EXCEP|
|00004b70| 54 49 4f 4e 27 20 42 55 | 47 20 50 52 4f 42 4c 45 |TION' BU|G PROBLE|
|00004b80| 4d 20 20 20 20 20 20 20 | 20 20 7d 00 92 0b 00 01 |M       |  }.....|
|00004b90| 10 7b 54 45 49 64 6c 65 | 28 74 65 78 74 48 29 3b |.{TEIdle|(textH);|
|00004ba0| 7d 00 92 1f 00 01 38 7b | 2d 2d 2d 2d 2d 2d 2d 2d |}.....8{|--------|
|00004bb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004bc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004bd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 7d ee |--------|------}.|
|00004be0| 94 01 92 1f 00 01 38 7b | 2d 2d 2d 2d 2d 2d 2d 2d |......8{|--------|
|00004bf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 7d 3e |--------|------}>|
|00004c20| 92 1f 00 01 38 7b 20 54 | 68 69 73 20 69 73 20 74 |....8{ T|his is t|
|00004c30| 68 65 20 66 69 78 65 64 | 20 73 74 61 74 65 6d 65 |he fixed| stateme|
|00004c40| 6e 74 20 77 68 69 63 68 | 20 65 6c 69 6d 69 6e 61 |nt which| elimina|
|00004c50| 74 65 73 20 74 68 65 09 | 09 09 09 20 7d 0b 92 14 |tes the.|... }...|
|00004c60| 00 01 23 7b 27 4f 64 64 | 20 41 64 64 72 65 73 73 |..#{'Odd| Address|
|00004c70| 20 45 78 63 65 70 74 69 | 6f 6e 27 09 09 09 09 09 | Excepti|on'.....|
|00004c80| 09 09 09 09 09 7d 86 06 | 5c 05 74 65 78 74 48 46 |.....}..|\.textHF|
|00004c90| 58 08 84 09 06 54 45 49 | 64 6c 65 10 5c 05 74 65 |X....TEI|dle.\.te|
|00004ca0| 78 74 48 16 98 01 92 1f | 00 01 38 7b 2d 2d 2d 2d |xtH.....|..8{----|
|00004cb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004cc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004cd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004ce0| 2d 2d 7d 67 94 01 86 14 | 5c 0c 47 65 74 4e 65 78 |--}g....|\.GetNex|
|00004cf0| 74 45 76 65 6e 74 10 5c | 0a 65 76 65 72 79 45 76 |tEvent.\|.everyEv|
|00004d00| 65 6e 74 12 5c 07 6d 79 | 45 76 65 6e 74 16 88 13 |ent.\.my|Event...|
|00004d10| 63 fe 00 00 00 08 15 80 | 00 00 00 00 00 00 00 00 |c.......|........|
|00004d20| 00 5c 07 6d 79 45 76 65 | 6e 74 52 5c 04 77 68 61 |.\.myEve|ntR\.wha|
|00004d30| 74 08 6c 08 94 01 7c 0c | 00 00 12 a1 09 6d 6f 75 |t.l...|.|.....mou|
|00004d40| 73 65 44 6f 77 6e 50 92 | 00 08 00 00 00 00 a6 01 |seDownP.|........|
|00004d50| 88 21 50 76 00 00 00 08 | 15 80 00 00 00 00 00 00 |.!Pv....|........|
|00004d60| 00 00 00 5c 0a 46 69 6e | 64 57 69 6e 64 6f 77 10 |...\.Fin|dWindow.|
|00004d70| 5c 07 6d 79 45 76 65 6e | 74 52 5c 05 77 68 65 72 |\.myEven|tR\.wher|
|00004d80| 65 12 5c 0b 77 68 69 63 | 68 57 69 6e 64 6f 77 16 |e.\.whic|hWindow.|
|00004d90| 6c 08 94 01 7c 0d 00 00 | 3b 5b 0b 69 6e 53 79 73 |l...|...|;[.inSys|
|00004da0| 57 69 6e 64 6f 77 4e 7e | 00 0b 00 00 00 00 a6 01 |WindowN~|........|
|00004db0| 84 14 0b 53 79 73 74 65 | 6d 43 6c 69 63 6b 10 5c |...Syste|mClick.\|
|00004dc0| 07 6d 79 45 76 65 6e 74 | 12 5c 0b 77 68 69 63 68 |.myEvent|.\.which|
|00004dd0| 57 69 6e 64 6f 77 16 08 | 98 01 94 01 7c 0c 00 00 |Window..|....|...|
|00004de0| 3b 41 09 69 6e 4d 65 6e | 75 42 61 72 4d 94 00 0c |;A.inMen|uBarM...|
|00004df0| 00 00 00 00 a6 01 84 17 | 09 44 6f 43 6f 6d 6d 61 |........|.DoComma|
|00004e00| 6e 64 10 5c 0a 4d 65 6e | 75 53 65 6c 65 63 74 10 |nd.\.Men|uSelect.|
|00004e10| 5c 07 6d 79 45 76 65 6e | 74 52 5c 05 77 68 65 72 |\.myEven|tR\.wher|
|00004e20| 65 16 16 08 98 01 94 01 | 7c 0b 00 00 3b 89 06 69 |e.......||...;..i|
|00004e30| 6e 44 72 61 67 08 4f a0 | 00 0d 00 00 00 00 a6 01 |nDrag.O.|........|
|00004e40| 84 1d 0a 44 72 61 67 57 | 69 6e 64 6f 77 10 5c 0b |...DragW|indow.\.|
|00004e50| 77 68 69 63 68 57 69 6e | 64 6f 77 12 5c 07 6d 79 |whichWin|dow.\.my|
|00004e60| 45 76 65 6e 74 52 5c 05 | 77 68 65 72 65 12 5c 08 |EventR\.|where.\.|
|00004e70| 64 72 61 67 52 65 63 74 | 16 08 98 01 94 01 7c 0c |dragRect|......|.|
|00004e80| 00 00 3b 73 09 69 6e 43 | 6f 6e 74 65 6e 74 4e 28 |..;s.inC|ontentN(|
|00004e90| 00 0e 00 00 00 00 a6 01 | 7e 03 00 00 4f 88 86 0f |........|~...O...|
|00004ea0| 5c 0b 77 68 69 63 68 57 | 69 6e 64 6f 77 46 5c 0b |\.whichW|indowF\.|
|00004eb0| 46 72 6f 6e 74 57 69 6e | 64 6f 77 08 84 0f 0c 53 |FrontWin|dow....S|
|00004ec0| 65 6c 65 63 74 57 69 6e | 64 6f 77 10 5c 0b 77 68 |electWin|dow.\.wh|
|00004ed0| 69 63 68 57 69 6e 64 6f | 77 16 96 01 7e 03 00 00 |ichWindo|w...~...|
|00004ee0| 4f 76 84 12 0d 47 6c 6f | 62 61 6c 54 6f 4c 6f 63 |Ov...Glo|balToLoc|
|00004ef0| 61 6c 10 5c 07 6d 79 45 | 76 65 6e 74 52 5c 05 77 |al.\.myE|ventR\.w|
|00004f00| 68 65 72 65 16 08 98 01 | 80 1d 5c 06 65 78 74 65 |here....|..\.exte|
|00004f10| 6e 64 0a 5c 06 42 69 74 | 41 6e 64 10 5c 07 6d 79 |nd.\.Bit|And.\.my|
|00004f20| 45 76 65 6e 74 52 5c 09 | 6d 6f 64 69 66 69 65 72 |EventR\.|modifier|
|00004f30| 73 12 5c 08 73 68 69 66 | 74 4b 65 79 16 46 5a 03 |s.\.shif|tKey.FZ.|
|00004f40| 00 00 98 01 84 17 07 54 | 45 43 6c 69 63 6b 10 5c |.......T|EClick.\|
|00004f50| 07 6d 79 45 76 65 6e 74 | 52 5c 05 77 68 65 72 65 |.myEvent|R\.where|
|00004f60| 12 5c 06 65 78 74 65 6e | 64 12 5c 05 74 65 78 74 |.\.exten|d.\.text|
|00004f70| 48 16 98 01 9a 01 98 01 | 92 07 00 00 08 09 09 7b |H.......|.......{|
|00004f80| 65 6c 73 65 7d 7d 9a 01 | 98 01 92 0a 00 00 0e 09 |else}}..|........|
|00004f90| 09 09 7b 69 6e 43 6f 6e | 74 65 6e 74 7d 74 94 01 |..{inCon|tent}t..|
|00004fa0| 7c 0c 00 00 3b b7 08 69 | 6e 47 6f 41 77 61 79 08 ||...;..i|nGoAway.|
|00004fb0| 00 00 00 11 00 00 00 00 | a6 01 86 18 5c 0b 54 72 |........|....\.Tr|
|00004fc0| 61 63 6b 47 6f 41 77 61 | 79 10 5c 0b 77 68 69 63 |ackGoAwa|y.\.whic|
|00004fd0| 68 57 69 6e 64 6f 77 12 | 5c 07 6d 79 45 76 65 6e |hWindow.|\.myEven|
|00004fe0| 74 52 5c 05 77 68 65 72 | 65 16 84 0e 0a 4b 69 6c |tR\.wher|e....Kil|
|00004ff0| 6c 57 69 6e 64 6f 77 10 | 5c 0b 77 68 69 63 68 57 |lWindow.|\.whichW|
|00005000| 69 6e 64 6f 77 16 98 01 | 94 01 9c 01 92 34 00 00 |indow...|.....4..|
|00005010| 62 09 09 7b 61 64 64 65 | 64 20 74 6f 20 73 61 74 |b..{adde|d to sat|
|00005020| 69 73 66 79 20 4c 69 67 | 68 74 53 70 65 65 64 73 |isfy Lig|htSpeeds|
|00005030| 20 43 41 53 45 20 73 74 | 61 74 65 6d 65 6e 74 20 | CASE st|atement |
|00005040| 6e 65 65 64 73 2c 20 61 | 76 6f 69 64 73 20 27 43 |needs, a|voids 'C|
|00005050| 61 73 65 20 53 65 6c 65 | 63 74 6f 72 20 52 61 6e |ase Sele|ctor Ran|
|00005060| 67 65 20 28 54 72 61 70 | 20 34 29 27 20 65 72 72 |ge (Trap| 4)' err|
|00005070| 6f 72 7d 00 9a 01 98 01 | 92 0c 00 00 13 09 09 7b |or}.....|.......{|
|00005080| 63 61 73 65 20 46 69 6e | 64 57 69 6e 64 6f 77 7d |case Fin|dWindow}|
|00005090| 94 01 7a 0b 00 00 12 cd | 07 6b 65 79 44 6f 77 6e |..z.....|.keyDown|
|000050a0| 50 a8 00 13 00 00 00 00 | 7c 0b 00 00 12 f7 07 61 |P.......||......a|
|000050b0| 75 74 6f 4b 65 79 5c 9c | 00 13 00 00 00 00 a6 01 |utoKey\.|........|
|000050c0| 7e 03 00 00 51 ba 80 20 | 5c 07 74 68 65 43 68 61 |~...Q.. |\.theCha|
|000050d0| 72 0a 5c 03 43 48 52 10 | 5c 06 42 69 74 41 6e 64 |r.\.CHR.|\.BitAnd|
|000050e0| 10 5c 07 6d 79 45 76 65 | 6e 74 52 5c 07 6d 65 73 |.\.myEve|ntR\.mes|
|000050f0| 73 61 67 65 12 5c 0c 63 | 68 61 72 43 6f 64 65 4d |sage.\.c|harCodeM|
|00005100| 61 73 6b 16 16 08 98 01 | 86 18 5c 06 42 69 74 41 |ask.....|..\.BitA|
|00005110| 6e 64 10 5c 07 6d 79 45 | 76 65 6e 74 52 5c 09 6d |nd.\.myE|ventR\.m|
|00005120| 6f 64 69 66 69 65 72 73 | 12 5c 06 63 6d 64 4b 65 |odifiers|.\.cmdKe|
|00005130| 79 16 46 08 5a 03 00 00 | 92 0d 00 00 15 09 7b 73 |y.F.Z...|......{s|
|00005140| 65 65 20 69 66 20 43 4d | 44 20 70 72 65 73 73 65 |ee if CM|D presse|
|00005150| 64 7d 84 11 09 44 6f 43 | 6f 6d 6d 61 6e 64 10 5c |d}...DoC|ommand.\|
|00005160| 07 4d 65 6e 75 4b 65 79 | 10 5c 07 74 68 65 43 68 |.MenuKey|.\.theCh|
|00005170| 61 72 16 16 96 01 84 0e | 05 54 45 4b 65 79 10 5c |ar......|.TEKey.\|
|00005180| 07 74 68 65 43 68 61 72 | 12 5c 05 74 65 78 74 48 |.theChar|.\.textH|
|00005190| 16 08 98 01 92 12 00 00 | 1f 09 7b 64 72 61 77 20 |........|..{draw |
|000051a0| 74 68 65 20 63 68 61 72 | 61 63 74 65 72 20 69 6e |the char|acter in|
|000051b0| 20 77 69 6e 64 6f 77 7d | 9a 01 98 01 92 10 00 00 | window}|........|
|000051c0| 1b 09 09 09 7b 6b 65 79 | 44 6f 77 6e 2c 20 61 75 |....{key|Down, au|
|000051d0| 74 6f 4b 65 79 20 62 65 | 67 69 6e 7d 94 01 7c 0d |toKey be|gin}..|.|
|000051e0| 00 00 13 3f 0b 61 63 74 | 69 76 61 74 65 45 76 74 |...?.act|ivateEvt|
|000051f0| 00 00 00 16 00 00 00 00 | a6 01 7e 03 00 00 5c 7c |........|..~...\||
|00005200| 86 1a 5c 06 42 69 74 41 | 6e 64 10 5c 07 6d 79 45 |..\.BitA|nd.\.myE|
|00005210| 76 65 6e 74 52 5c 09 6d | 6f 64 69 66 69 65 72 73 |ventR\.m|odifiers|
|00005220| 12 5c 0a 61 63 74 69 76 | 65 46 6c 61 67 16 46 08 |.\.activ|eFlag.F.|
|00005230| 5a 03 00 00 92 18 00 00 | 2a 20 09 09 7b 61 70 70 |Z.......|* ..{app|
|00005240| 6c 69 63 61 74 69 6f 6e | 20 77 69 6e 64 6f 77 20 |lication| window |
|00005250| 69 73 20 62 65 63 6f 6d | 69 6e 67 20 61 63 74 69 |is becom|ing acti|
|00005260| 76 65 7d f0 7e 03 00 00 | 58 ce 84 15 07 53 65 74 |ve}.~...|X....Set|
|00005270| 50 6f 72 74 10 5c 07 47 | 72 61 66 50 74 72 10 5c |Port.\.G|rafPtr.\|
|00005280| 07 6d 79 45 76 65 6e 74 | 52 5c 07 6d 65 73 73 61 |.myEvent|R\.messa|
|00005290| 67 65 16 16 98 01 94 01 | 92 20 00 01 3a 7b 42 45 |ge......|. ..:{BE|
|000052a0| 4c 4f 57 20 49 53 20 54 | 48 45 20 4f 52 49 47 49 |LOW IS T|HE ORIGI|
|000052b0| 4e 41 4c 20 53 54 41 54 | 45 4d 45 4e 54 20 57 48 |NAL STAT|EMENT WH|
|000052c0| 49 43 48 20 4c 53 50 20 | 57 4f 55 4c 44 4e 27 54 |ICH LSP |WOULDN'T|
|000052d0| 20 41 4c 4c 4f 57 7d 00 | 92 20 00 01 3a 7b 74 65 | ALLOW}.|. ..:{te|
|000052e0| 78 74 48 20 3a 3d 20 54 | 45 48 61 6e 64 6c 65 20 |xtH := T|EHandle |
|000052f0| 28 57 69 6e 64 6f 77 50 | 65 65 6b 20 28 6d 79 45 |(WindowP|eek (myE|
|00005300| 76 65 6e 74 2e 6d 65 73 | 73 61 67 65 29 5e 2e 72 |vent.mes|sage)^.r|
|00005310| 65 66 63 6f 6e 3b 7d 00 | 94 01 92 1f 00 01 39 7b |efcon;}.|......9{|
|00005320| 54 48 45 53 45 20 41 52 | 45 20 54 48 45 20 46 49 |THESE AR|E THE FI|
|00005330| 58 45 44 20 53 54 41 54 | 45 4d 45 4e 54 53 2c 20 |XED STAT|EMENTS, |
|00005340| 43 4f 45 52 43 45 44 20 | 49 4e 54 4f 20 41 43 43 |COERCED |INTO ACC|
|00005350| 45 50 54 41 4e 43 45 7d | 80 18 5c 09 6d 79 57 69 |EPTANCE}|..\.myWi|
|00005360| 6e 50 65 65 6b 0a 5c 0a | 57 69 6e 64 6f 77 50 65 |nPeek.\.|WindowPe|
|00005370| 65 6b 10 5c 07 6d 79 45 | 76 65 6e 74 52 5c 07 6d |ek.\.myE|ventR\.m|
|00005380| 65 73 73 61 67 65 16 08 | 98 01 92 0d 00 00 14 09 |essage..|........|
|00005390| 7b 63 6f 65 72 63 65 64 | 20 73 74 61 74 65 6d 65 |{coerced| stateme|
|000053a0| 6e 74 7d 49 80 12 5c 09 | 74 68 65 52 65 66 63 6f |nt}I..\.|theRefco|
|000053b0| 6e 0a 5c 09 6d 79 57 69 | 6e 50 65 65 6b 54 52 5c |n.\.myWi|nPeekTR\|
|000053c0| 06 72 65 66 63 6f 6e 08 | 98 01 92 0f 00 00 18 09 |.refcon.|........|
|000053d0| 09 09 09 09 7b 63 6f 65 | 72 63 65 64 20 73 74 61 |....{coe|rced sta|
|000053e0| 74 65 6d 65 6e 74 7d 43 | 80 11 5c 05 74 65 78 74 |tement}C|..\.text|
|000053f0| 48 0a 5c 08 54 45 48 61 | 6e 64 6c 65 10 5c 09 74 |H.\.TEHa|ndle.\.t|
|00005400| 68 65 52 65 66 63 6f 6e | 16 08 98 01 92 12 00 00 |heRefcon|........|
|00005410| 1e 09 09 09 7b 6d 6f 64 | 69 66 65 64 2f 63 6f 65 |....{mod|ifed/coe|
|00005420| 72 63 65 64 20 73 74 61 | 74 65 6d 65 6e 74 7d 00 |rced sta|tement}.|
|00005430| 94 01 92 1f 00 01 39 7b | 2d 2d 2d 2d 2d 2d 2d 2d |......9{|--------|
|00005440| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005450| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005460| 2d 2d 2d 2d 2d 2d 2d 09 | 2d 2d 2d 2d 2d 2d 2d 7d |-------.|-------}|
|00005470| 92 20 00 01 3a 7b 54 48 | 49 53 20 49 53 20 54 48 |. ..:{TH|IS IS TH|
|00005480| 45 20 27 4e 6f 6e 2d 62 | 6c 69 6e 6b 69 6e 67 20 |E 'Non-b|linking |
|00005490| 43 75 72 73 6f 72 27 20 | 42 55 47 20 50 52 4f 42 |Cursor' |BUG PROB|
|000054a0| 4c 45 4d 20 20 20 20 20 | 20 20 09 09 20 20 7d 70 |LEM     |  ..  }p|
|000054b0| 92 1e 00 01 36 7b 54 68 | 65 20 6c 69 6e 65 20 62 |....6{Th|e line b|
|000054c0| 65 6c 6f 77 20 77 61 73 | 20 6c 65 66 74 20 6f 75 |elow was| left ou|
|000054d0| 74 20 6f 66 20 74 68 65 | 20 6f 72 69 67 69 6e 61 |t of the| origina|
|000054e0| 6c 20 63 6f 64 65 09 09 | 09 09 7d 67 92 1f 00 01 |l code..|..}g....|
|000054f0| 38 7b 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |8{------|--------|
|00005500| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005510| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005520| 2d 2d 2d 2d 2d 2d 2d 2d | 7d 70 84 0b 0a 54 45 41 |--------|}p...TEA|
|00005530| 63 74 69 76 61 74 65 10 | 5c 05 74 65 78 74 48 16 |ctivate.|\.textH.|
|00005540| 98 01 92 14 00 00 23 09 | 09 7b 6e 65 65 64 65 64 |......#.|.{needed|
|00005550| 20 74 6f 20 63 61 75 73 | 65 20 63 75 72 73 6f 72 | to caus|e cursor|
|00005560| 20 62 6c 69 6e 6b 69 6e | 67 7d 92 1f 00 01 38 7b | blinkin|g}....8{|
|00005570| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005580| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005590| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000055a0| 2d 2d 2d 2d 2d 2d 7d 20 | 84 17 0a 45 6e 61 62 6c |------} |...Enabl|
|000055b0| 65 49 74 65 6d 10 5c 07 | 6d 79 4d 65 6e 75 73 18 |eItem.\.|myMenus.|
|000055c0| 5c 05 66 69 6c 65 4d 1c | 12 5c 09 63 6c 6f 73 65 |\.fileM.|.\.close|
|000055d0| 49 74 65 6d 16 08 98 01 | 84 17 0b 44 69 73 61 62 |Item....|...Disab|
|000055e0| 6c 65 49 74 65 6d 10 5c | 07 6d 79 4d 65 6e 75 73 |leItem.\|.myMenus|
|000055f0| 18 5c 05 65 64 69 74 4d | 1c 12 5c 08 75 6e 64 6f |.\.editM|..\.undo|
|00005600| 49 74 65 6d 16 08 98 01 | 94 01 92 20 00 01 3a 7b |Item....|... ..:{|
|00005610| 42 45 4c 4f 57 20 49 53 | 20 54 48 45 20 4f 52 49 |BELOW IS| THE ORI|
|00005620| 47 49 4e 41 4c 20 53 54 | 41 54 45 4d 45 4e 54 20 |GINAL ST|ATEMENT |
|00005630| 57 48 49 43 48 20 4c 53 | 50 20 57 4f 55 4c 44 4e |WHICH LS|P WOULDN|
|00005640| 27 54 20 41 4c 4c 4f 57 | 7d 7b 92 22 00 01 3f 7b |'T ALLOW|}{."..?{|
|00005650| 69 66 20 57 69 6e 64 6f | 77 50 65 65 6b 20 28 46 |if Windo|wPeek (F|
|00005660| 72 6f 6e 74 57 69 6e 64 | 6f 77 29 20 5e 2e 6e 65 |rontWind|ow) ^.ne|
|00005670| 78 74 57 69 6e 64 6f 77 | 5e 2e 77 69 6e 64 6f 77 |xtWindow|^.window|
|00005680| 4b 69 6e 64 20 3c 20 30 | 20 74 68 65 6e 7d 94 01 |Kind < 0| then}..|
|00005690| 92 21 00 01 3d 7b 42 45 | 4c 4f 57 20 41 52 45 20 |.!..={BE|LOW ARE |
|000056a0| 54 48 45 20 43 4f 45 52 | 43 45 44 20 53 54 41 54 |THE COER|CED STAT|
|000056b0| 45 4d 45 4e 54 53 20 4e | 45 45 44 45 44 20 54 4f |EMENTS N|EEDED TO|
|000056c0| 20 4d 41 4b 45 20 4c 53 | 50 20 54 41 4b 45 20 49 | MAKE LS|P TAKE I|
|000056d0| 54 7d 80 15 5c 0a 6d 79 | 57 69 6e 50 65 65 6b 32 |T}..\.my|WinPeek2|
|000056e0| 0a 5c 0a 57 69 6e 64 6f | 77 50 65 65 6b 10 5c 0b |.\.Windo|wPeek.\.|
|000056f0| 46 72 6f 6e 74 57 69 6e | 64 6f 77 16 98 01 92 0d |FrontWin|dow.....|
|00005700| 00 00 15 09 09 7b 63 6f | 65 72 63 65 64 20 73 74 |.....{co|erced st|
|00005710| 61 74 65 6d 65 6e 74 7d | 80 15 5c 0a 6d 79 57 69 |atement}|..\.myWi|
|00005720| 6e 50 65 65 6b 33 0a 5c | 0a 6d 79 57 69 6e 50 65 |nPeek3.\|.myWinPe|
|00005730| 65 6b 32 54 52 5c 0a 6e | 65 78 74 57 69 6e 64 6f |ek2TR\.n|extWindo|
|00005740| 77 08 98 01 92 0d 00 00 | 15 09 09 7b 63 6f 65 72 |w.......|...{coer|
|00005750| 63 65 64 20 73 74 61 74 | 65 6d 65 6e 74 7d 86 08 |ced stat|ement}..|
|00005760| 5c 0a 6d 79 57 69 6e 50 | 65 65 6b 33 46 58 92 1d |\.myWinP|eek3FX..|
|00005770| 00 00 34 09 09 7b 74 65 | 73 74 20 74 6f 20 6d 61 |..4..{te|st to ma|
|00005780| 6b 65 20 73 75 72 65 20 | 74 68 65 72 65 20 72 65 |ke sure |there re|
|00005790| 61 6c 6c 79 20 69 73 20 | 61 6e 6f 74 68 65 72 20 |ally is |another |
|000057a0| 77 69 6e 64 6f 77 7d 4e | 86 11 5c 0a 6d 79 57 69 |window}N|..\.myWi|
|000057b0| 6e 50 65 65 6b 33 54 52 | 5c 0a 77 69 6e 64 6f 77 |nPeek3TR|\.window|
|000057c0| 4b 69 6e 64 48 08 5a 03 | 00 00 92 14 00 00 22 09 |KindH.Z.|......".|
|000057d0| 09 09 7b 69 66 20 3c 20 | 30 2c 20 69 74 27 73 20 |..{if < |0, it's |
|000057e0| 61 20 64 65 73 6b 20 61 | 63 63 65 73 73 6f 72 79 |a desk a|ccessory|
|000057f0| 7d 69 94 01 80 0e 5c 0a | 73 63 72 43 6f 70 79 45 |}i....\.|scrCopyE|
|00005800| 72 72 0a 5c 0b 54 45 46 | 72 6f 6d 53 63 72 61 70 |rr.\.TEF|romScrap|
|00005810| 98 01 92 16 00 00 27 09 | 09 7b 63 6f 70 79 20 66 |......'.|.{copy f|
|00005820| 72 6f 6d 20 74 68 65 20 | 64 65 73 6b 20 61 63 63 |rom the |desk acc|
|00005830| 65 73 73 6f 72 79 20 73 | 63 72 61 70 20 7d 92 1c |essory s|crap }..|
|00005840| 00 01 32 09 09 09 09 09 | 09 09 09 09 09 09 09 09 |..2.....|........|
|00005850| 09 7b 20 69 66 20 74 68 | 65 20 44 41 20 69 73 20 |.{ if th|e DA is |
|00005860| 6f 70 65 6e 20 62 75 74 | 20 64 65 61 63 74 69 76 |open but| deactiv|
|00005870| 61 74 65 64 7d 0d 92 19 | 00 01 2d 09 09 09 09 09 |ated}...|..-.....|
|00005880| 09 09 09 09 09 09 09 09 | 09 7b 20 77 69 74 68 20 |........|.{ with |
|00005890| 53 68 6f 77 4f 66 66 20 | 77 69 6e 64 6f 77 73 20 |ShowOff |windows |
|000058a0| 70 72 65 73 65 6e 74 7d | 9a 01 92 11 00 00 1c 09 |present}|........|
|000058b0| 09 09 7b 69 66 20 42 69 | 74 41 6e 64 2e 2e 2e 2e |..{if Bi|tAnd....|
|000058c0| 74 68 65 6e 20 62 65 67 | 69 6e 7d 2e 94 01 96 01 |then beg|in}.....|
|000058d0| 92 19 00 00 2d 20 09 09 | 09 7b 61 70 70 6c 69 63 |....- ..|.{applic|
|000058e0| 61 74 69 6f 6e 20 77 69 | 6e 64 6f 77 20 69 73 20 |ation wi|ndow is |
|000058f0| 62 65 63 6f 6d 69 6e 67 | 20 69 6e 61 63 74 69 76 |becoming| inactiv|
|00005900| 65 7d 7e 03 00 00 5c 64 | 94 01 92 21 00 01 3c 7b |e}~...\d|...!..<{|
|00005910| 42 45 4c 4f 57 20 41 52 | 45 20 54 48 45 20 4f 52 |BELOW AR|E THE OR|
|00005920| 49 47 49 4e 41 4c 20 53 | 54 41 54 45 4d 45 4e 54 |IGINAL S|TATEMENT|
|00005930| 53 20 57 48 49 43 48 20 | 4c 53 50 20 57 4f 55 4c |S WHICH |LSP WOUL|
|00005940| 44 4e 27 54 20 41 4c 4c | 4f 57 7d 72 92 22 00 01 |DN'T ALL|OW}r."..|
|00005950| 3f 7b 54 45 44 65 61 63 | 74 69 76 61 74 65 28 54 |?{TEDeac|tivate(T|
|00005960| 45 48 61 6e 64 6c 65 28 | 57 69 6e 64 6f 77 50 65 |EHandle(|WindowPe|
|00005970| 65 6b 28 6d 79 45 76 65 | 6e 74 2e 6d 65 73 73 61 |ek(myEve|nt.messa|
|00005980| 67 65 29 5e 2e 72 65 66 | 63 6f 6e 29 29 3b 09 7d |ge)^.ref|con));.}|
|00005990| 92 1a 00 01 2f 7b 69 66 | 20 57 69 6e 64 6f 77 50 |..../{if| WindowP|
|000059a0| 65 65 6b 20 28 46 72 6f | 6e 74 57 69 6e 64 6f 77 |eek (Fro|ntWindow|
|000059b0| 29 5e 2e 77 69 6e 64 6f | 77 4b 69 6e 64 20 3c 20 |)^.windo|wKind < |
|000059c0| 30 20 20 7d 94 01 92 1e | 00 01 36 7b 42 45 4c 4f |0  }....|..6{BELO|
|000059d0| 57 20 41 52 45 20 54 48 | 45 20 43 4f 45 52 43 45 |W ARE TH|E COERCE|
|000059e0| 44 20 53 54 41 54 45 4d | 45 4e 54 53 20 54 4f 20 |D STATEM|ENTS TO |
|000059f0| 4d 41 4b 45 20 4c 53 50 | 20 54 41 4b 45 20 49 54 |MAKE LSP| TAKE IT|
|00005a00| 7d 74 80 18 5c 09 6d 79 | 57 69 6e 50 65 65 6b 0a |}t..\.my|WinPeek.|
|00005a10| 5c 0a 57 69 6e 64 6f 77 | 50 65 65 6b 10 5c 07 6d |\.Window|Peek.\.m|
|00005a20| 79 45 76 65 6e 74 52 5c | 07 6d 65 73 73 61 67 65 |yEventR\|.message|
|00005a30| 16 08 98 01 92 0a 00 00 | 0f 09 7b 66 6f 72 20 63 |........|..{for c|
|00005a40| 6f 65 72 63 69 6f 6e 7d | 80 12 5c 09 74 68 65 52 |oercion}|..\.theR|
|00005a50| 65 66 63 6f 6e 0a 5c 09 | 6d 79 57 69 6e 50 65 65 |efcon.\.|myWinPee|
|00005a60| 6b 54 52 5c 06 72 65 66 | 63 6f 6e 08 98 01 92 0c |kTR\.ref|con.....|
|00005a70| 00 00 13 09 09 09 09 09 | 7b 66 6f 72 20 63 6f 65 |........|{for coe|
|00005a80| 72 63 69 6f 6e 7d 84 14 | 0c 54 45 44 65 61 63 74 |rcion}..|.TEDeact|
|00005a90| 69 76 61 74 65 10 5c 08 | 54 45 48 61 6e 64 6c 65 |ivate.\.|TEHandle|
|00005aa0| 10 5c 09 74 68 65 52 65 | 66 63 6f 6e 16 16 98 01 |.\.theRe|fcon....|
|00005ab0| 92 0e 00 00 16 09 09 7b | 63 6f 65 72 65 63 65 64 |.......{|coereced|
|00005ac0| 20 73 74 61 74 65 6d 65 | 6e 74 7d 9e 94 01 80 15 | stateme|nt}.....|
|00005ad0| 5c 0a 6d 79 57 69 6e 50 | 65 65 6b 32 0a 5c 0a 57 |\.myWinP|eek2.\.W|
|00005ae0| 69 6e 64 6f 77 50 65 65 | 6b 10 5c 0b 46 72 6f 6e |indowPee|k.\.Fron|
|00005af0| 74 57 69 6e 64 6f 77 16 | 98 01 92 12 00 00 1f 09 |tWindow.|........|
|00005b00| 09 7b 73 70 65 63 69 61 | 6c 20 63 6f 65 72 63 69 |.{specia|l coerci|
|00005b10| 6f 6e 20 73 74 61 74 65 | 6d 65 6e 74 73 7d 80 15 |on state|ments}..|
|00005b20| 5c 0a 74 68 65 57 69 6e | 4b 69 6e 64 0a 5c 0a 6d |\.theWin|Kind.\.m|
|00005b30| 79 57 69 6e 50 65 65 6b | 32 54 52 5c 0a 77 69 6e |yWinPeek|2TR\.win|
|00005b40| 64 6f 77 4b 69 6e 64 08 | 98 01 92 0b 00 00 11 09 |dowKind.|........|
|00005b50| 09 09 7b 66 6f 72 20 63 | 6f 65 72 63 69 6f 6e 7d |..{for c|oercion}|
|00005b60| 86 0a 5c 0a 74 68 65 57 | 69 6e 4b 69 6e 64 48 08 |..\.theW|inKindH.|
|00005b70| 5a 03 00 00 92 14 00 00 | 22 09 09 09 7b 69 66 20 |Z.......|"...{if |
|00005b80| 3c 20 30 2c 20 69 74 27 | 73 20 61 20 64 65 73 6b |< 0, it'|s a desk|
|00005b90| 20 61 63 63 65 73 73 6f | 72 79 7d 00 94 01 7e 03 | accesso|ry}...~.|
|00005ba0| 00 00 5c 30 84 16 0a 45 | 6e 61 62 6c 65 49 74 65 |..\0...E|nableIte|
|00005bb0| 6d 10 5c 07 6d 79 4d 65 | 6e 75 73 18 5c 05 65 64 |m.\.myMe|nus.\.ed|
|00005bc0| 69 74 4d 1c 12 5c 08 75 | 6e 64 6f 49 74 65 6d 16 |itM..\.u|ndoItem.|
|00005bd0| 98 01 80 0c 5c 08 73 63 | 72 61 70 45 72 72 0a 5c |....\.sc|rapErr.\|
|00005be0| 09 5a 65 72 6f 53 63 72 | 61 70 98 01 80 0d 5c 0a |.ZeroScr|ap....\.|
|00005bf0| 73 63 72 43 6f 70 79 45 | 72 72 0a 5c 09 54 45 54 |scrCopyE|rr.\.TET|
|00005c00| 6f 53 63 72 61 70 98 01 | 9a 01 92 13 00 00 21 20 |oScrap..|......! |
|00005c10| 09 09 09 7b 69 66 20 57 | 69 6e 64 6f 77 50 65 65 |...{if W|indowPee|
|00005c20| 6b 2e 2e 2e 2e 74 68 65 | 6e 20 62 65 67 69 6e 7d |k....the|n begin}|
|00005c30| 96 01 84 17 0b 44 69 73 | 61 62 6c 65 49 74 65 6d |.....Dis|ableItem|
|00005c40| 10 5c 07 6d 79 4d 65 6e | 75 73 18 5c 05 65 64 69 |.\.myMen|us.\.edi|
|00005c50| 74 4d 1c 12 5c 08 75 6e | 64 6f 49 74 65 6d 16 08 |tM..\.un|doItem..|
|00005c60| 98 01 9a 01 98 01 92 0a | 00 00 0e 09 09 7b 65 6c |........|.....{el|
|00005c70| 73 65 20 62 65 67 69 6e | 7d 00 9a 01 98 01 92 0e |se begin|}.......|
|00005c80| 00 00 16 09 09 09 7b 61 | 63 74 69 76 61 74 65 45 |......{a|ctivateE|
|00005c90| 76 74 20 62 65 67 69 6e | 7d 03 94 01 7c 0c 00 00 |vt begin|}...|...|
|00005ca0| 13 0f 09 75 70 64 61 74 | 65 45 76 74 51 de 00 1d |...updat|eEvtQ...|
|00005cb0| 00 00 00 00 a6 01 7e 03 | 00 00 63 76 94 01 92 1f |......~.|..cv....|
|00005cc0| 00 01 39 7b 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..9{----|--------|
|00005cd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005ce0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005cf0| 2d 2d 2d 09 2d 2d 2d 2d | 2d 2d 2d 7d 92 1f 00 01 |---.----|---}....|
|00005d00| 38 7b 54 48 49 53 20 49 | 53 20 54 48 45 20 27 45 |8{THIS I|S THE 'E|
|00005d10| 72 61 73 65 20 57 72 6f | 6e 67 20 57 69 6e 64 6f |rase Wro|ng Windo|
|00005d20| 77 27 20 42 55 47 20 50 | 52 4f 42 4c 45 4d 20 20 |w' BUG P|ROBLEM  |
|00005d30| 20 20 20 20 20 09 09 20 | 7d 46 92 1e 00 01 37 7b |     .. |}F....7{|
|00005d40| 54 68 65 20 6c 69 6e 65 | 73 20 62 65 6c 6f 77 20 |The line|s below |
|00005d50| 77 65 72 65 20 6c 65 66 | 74 20 6f 75 74 20 6f 66 |were lef|t out of|
|00005d60| 20 74 68 65 20 6f 72 69 | 67 69 6e 61 6c 20 63 6f | the ori|ginal co|
|00005d70| 64 65 09 09 09 7d 92 1f | 00 01 38 7b 2d 2d 2d 2d |de...}..|..8{----|
|00005d80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005d90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005da0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005db0| 2d 2d 7d a2 84 0c 07 47 | 65 74 50 6f 72 74 10 5c |--}....G|etPort.\|
|00005dc0| 09 73 61 76 65 64 50 6f | 72 74 16 08 98 01 92 12 |.savedPo|rt......|
|00005dd0| 00 00 1e 09 09 09 09 09 | 09 09 7b 73 61 76 65 20 |........|..{save |
|00005de0| 74 68 65 20 63 75 72 72 | 65 6e 74 20 70 6f 72 74 |the curr|ent port|
|00005df0| 7d 2d 84 15 07 53 65 74 | 50 6f 72 74 10 5c 07 47 |}-...Set|Port.\.G|
|00005e00| 72 61 66 50 74 72 10 5c | 07 6d 79 45 76 65 6e 74 |rafPtr.\|.myEvent|
|00005e10| 52 5c 07 6d 65 73 73 61 | 67 65 16 16 98 01 92 15 |R\.messa|ge......|
|00005e20| 00 00 24 09 09 7b 73 65 | 74 20 70 6f 72 74 20 74 |..$..{se|t port t|
|00005e30| 6f 20 6f 6e 65 20 6e 65 | 65 64 69 6e 67 20 75 70 |o one ne|eding up|
|00005e40| 64 61 74 69 6e 67 7d 2d | 92 1f 00 01 38 7b 2d 2d |dating}-|....8{--|
|00005e50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005e60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005e70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005e80| 2d 2d 2d 2d 7d 0d 84 18 | 0b 42 65 67 69 6e 55 70 |----}...|.BeginUp|
|00005e90| 64 61 74 65 10 5c 09 57 | 69 6e 64 6f 77 50 74 72 |date.\.W|indowPtr|
|00005ea0| 10 5c 07 6d 79 45 76 65 | 6e 74 52 5c 07 6d 65 73 |.\.myEve|ntR\.mes|
|00005eb0| 73 61 67 65 16 16 98 01 | 94 01 92 21 00 01 3c 7b |sage....|...!..<{|
|00005ec0| 42 45 4c 4f 57 20 41 52 | 45 20 54 48 45 20 4f 52 |BELOW AR|E THE OR|
|00005ed0| 49 47 49 4e 41 4c 20 53 | 54 41 54 45 4d 45 4e 54 |IGINAL S|TATEMENT|
|00005ee0| 53 20 57 48 49 43 48 20 | 4c 53 50 20 57 4f 55 4c |S WHICH |LSP WOUL|
|00005ef0| 44 4e 27 54 20 41 4c 4c | 4f 57 7d 2d 92 1e 00 01 |DN'T ALL|OW}-....|
|00005f00| 36 7b 45 72 61 73 65 52 | 65 63 74 20 28 57 69 6e |6{EraseR|ect (Win|
|00005f10| 64 6f 77 50 74 72 28 6d | 79 45 76 65 6e 74 2e 6d |dowPtr(m|yEvent.m|
|00005f20| 65 73 73 61 67 65 29 20 | 5e 2e 70 6f 72 74 52 65 |essage) |^.portRe|
|00005f30| 63 74 29 3b 20 20 7d 6c | 92 1c 00 01 33 7b 54 45 |ct);  }l|....3{TE|
|00005f40| 55 70 64 61 74 65 20 28 | 57 69 6e 64 6f 77 50 74 |Update (|WindowPt|
|00005f50| 72 20 28 6d 79 45 76 65 | 6e 74 2e 6d 65 73 73 61 |r (myEve|nt.messa|
|00005f60| 67 65 29 5e 2e 70 6f 72 | 74 52 65 63 74 2c 20 7d |ge)^.por|tRect, }|
|00005f70| 92 20 00 01 3a 7b 20 20 | 20 20 20 54 45 48 61 6e |. ..:{  |   TEHan|
|00005f80| 64 6c 65 20 28 57 69 6e | 64 6f 77 50 65 65 6b 20 |dle (Win|dowPeek |
|00005f90| 28 6d 79 45 76 65 6e 74 | 2e 6d 65 73 73 61 67 65 |(myEvent|.message|
|00005fa0| 29 5e 2e 72 65 66 63 6f | 6e 29 29 3b 20 20 7d 61 |)^.refco|n));  }a|
|00005fb0| 94 01 92 21 00 01 3d 7b | 42 45 4c 4f 57 20 41 52 |...!..={|BELOW AR|
|00005fc0| 45 20 54 48 45 20 43 4f | 45 52 43 45 44 20 53 54 |E THE CO|ERCED ST|
|00005fd0| 41 54 45 4d 45 4e 54 53 | 20 4e 45 45 44 45 44 20 |ATEMENTS| NEEDED |
|00005fe0| 54 4f 20 4d 41 4b 45 20 | 4c 53 50 20 54 41 4b 45 |TO MAKE |LSP TAKE|
|00005ff0| 20 49 54 7d 80 17 5c 08 | 6d 79 57 69 6e 50 74 72 | IT}..\.|myWinPtr|
|00006000| 0a 5c 09 57 69 6e 64 6f | 77 50 74 72 10 5c 07 6d |.\.Windo|wPtr.\.m|
|00006010| 79 45 76 65 6e 74 52 5c | 07 6d 65 73 73 61 67 65 |yEventR\|.message|
|00006020| 16 08 98 01 92 0b 00 00 | 10 09 09 7b 66 6f 72 20 |........|...{for |
|00006030| 63 6f 65 72 63 69 6f 6e | 7d 20 80 11 5c 07 74 68 |coercion|} ..\.th|
|00006040| 65 52 65 63 74 0a 5c 08 | 6d 79 57 69 6e 50 74 72 |eRect.\.|myWinPtr|
|00006050| 54 52 5c 08 70 6f 72 74 | 52 65 63 74 98 01 92 0c |TR\.port|Rect....|
|00006060| 00 00 13 09 09 09 09 09 | 7b 66 6f 72 20 63 6f 65 |........|{for coe|
|00006070| 72 63 69 6f 6e 7d 84 0c | 09 45 72 61 73 65 52 65 |rcion}..|.EraseRe|
|00006080| 63 74 10 5c 07 74 68 65 | 52 65 63 74 16 08 98 01 |ct.\.the|Rect....|
|00006090| 92 11 00 00 1c 09 09 09 | 09 09 09 09 09 09 7b 63 |........|......{c|
|000060a0| 6f 65 72 63 65 64 20 73 | 74 61 74 65 6d 65 6e 74 |oerced s|tatement|
|000060b0| 7d 6f 94 01 80 18 5c 09 | 6d 79 57 69 6e 50 65 65 |}o....\.|myWinPee|
|000060c0| 6b 0a 5c 0a 57 69 6e 64 | 6f 77 50 65 65 6b 10 5c |k.\.Wind|owPeek.\|
|000060d0| 07 6d 79 45 76 65 6e 74 | 52 5c 07 6d 65 73 73 61 |.myEvent|R\.messa|
|000060e0| 67 65 16 08 98 01 92 0a | 00 00 0f 09 7b 66 6f 72 |ge......|....{for|
|000060f0| 20 63 6f 65 72 63 69 6f | 6e 7d 80 12 5c 09 74 68 | coercio|n}..\.th|
|00006100| 65 52 65 66 63 6f 6e 0a | 5c 09 6d 79 57 69 6e 50 |eRefcon.|\.myWinP|
|00006110| 65 65 6b 54 52 5c 06 72 | 65 66 63 6f 6e 08 98 01 |eekTR\.r|efcon...|
|00006120| 92 0c 00 00 13 09 09 09 | 09 09 7b 66 6f 72 20 63 |........|..{for c|
|00006130| 6f 65 72 63 69 6f 6e 7d | 84 17 08 54 45 55 70 64 |oercion}|...TEUpd|
|00006140| 61 74 65 10 5c 07 74 68 | 65 52 65 63 74 12 5c 08 |ate.\.th|eRect.\.|
|00006150| 54 45 48 61 6e 64 6c 65 | 10 5c 09 74 68 65 52 65 |TEHandle|.\.theRe|
|00006160| 66 63 6f 6e 16 16 98 01 | 92 0e 00 00 16 09 09 09 |fcon....|........|
|00006170| 7b 63 6f 65 72 63 65 64 | 20 73 74 61 74 65 6d 65 |{coerced| stateme|
|00006180| 6e 74 7d 52 94 01 84 17 | 09 45 6e 64 55 70 64 61 |nt}R....|.EndUpda|
|00006190| 74 65 10 5c 09 57 69 6e | 64 6f 77 50 74 72 10 5c |te.\.Win|dowPtr.\|
|000061a0| 07 6d 79 45 76 65 6e 74 | 52 5c 07 6d 65 73 73 61 |.myEvent|R\.messa|
|000061b0| 67 65 16 16 98 01 92 28 | 00 01 4a 7b 2d 2d 2d 2d |ge.....(|..J{----|
|000061c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000061d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000061e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 09 2d 2d 2d 2d |--------|---.----|
|000061f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006200| 2d 2d 2d 2d 7d 65 92 27 | 00 01 49 7b 54 48 49 53 |----}e.'|..I{THIS|
|00006210| 20 49 53 20 41 4e 4f 54 | 48 45 52 20 50 41 52 54 | IS ANOT|HER PART|
|00006220| 20 4f 46 20 54 48 45 20 | 27 45 72 61 73 65 20 57 | OF THE |'Erase W|
|00006230| 72 6f 6e 67 20 57 69 6e | 64 6f 77 27 20 42 55 47 |rong Win|dow' BUG|
|00006240| 20 50 52 4f 42 4c 45 4d | 20 20 20 20 20 20 20 09 | PROBLEM|       .|
|00006250| 09 20 20 7d 92 2c 00 01 | 53 7b 54 68 65 20 6c 69 |.  }.,..|S{The li|
|00006260| 6e 65 20 62 65 6c 6f 77 | 20 77 61 73 20 6c 65 66 |ne below| was lef|
|00006270| 74 20 6f 75 74 20 6f 66 | 20 74 68 65 20 6f 72 69 |t out of| the ori|
|00006280| 67 69 6e 61 6c 20 63 6f | 64 65 09 09 09 09 20 20 |ginal co|de....  |
|00006290| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000062a0| 20 20 20 20 20 20 20 20 | 20 20 20 7d 92 27 00 01 |        |   }.'..|
|000062b0| 49 7b 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |I{------|--------|
|000062c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000062d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000062e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000062f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 7d 84 0c 07 53 65 74 |--------|-}...Set|
|00006300| 50 6f 72 74 10 5c 09 73 | 61 76 65 64 50 6f 72 74 |Port.\.s|avedPort|
|00006310| 16 08 98 01 92 11 00 00 | 1d 09 09 7b 73 65 74 20 |........|...{set |
|00006320| 70 6f 72 74 20 74 6f 20 | 6f 72 69 67 69 6e 61 6c |port to |original|
|00006330| 20 70 6f 72 74 7d 92 1f | 00 01 38 7b 2d 2d 2d 2d | port}..|..8{----|
|00006340| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006350| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006360| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006370| 2d 2d 7d 4e 9a 01 98 01 | 92 0c 00 00 13 09 09 7b |--}N....|.......{|
|00006380| 75 70 64 61 74 65 45 76 | 74 20 62 65 67 69 6e 7d |updateEv|t begin}|
|00006390| 9c 01 92 34 00 00 62 09 | 09 7b 61 64 64 65 64 20 |...4..b.|.{added |
|000063a0| 74 6f 20 73 61 74 69 73 | 66 79 20 4c 69 67 68 74 |to satis|fy Light|
|000063b0| 53 70 65 65 64 73 20 43 | 41 53 45 20 73 74 61 74 |Speeds C|ASE stat|
|000063c0| 65 6d 65 6e 74 20 6e 65 | 65 64 73 2c 20 61 76 6f |ement ne|eds, avo|
|000063d0| 69 64 73 20 27 43 61 73 | 65 20 53 65 6c 65 63 74 |ids 'Cas|e Select|
|000063e0| 6f 72 20 52 61 6e 67 65 | 20 28 54 72 61 70 20 34 |or Range| (Trap 4|
|000063f0| 29 27 20 65 72 72 6f 72 | 7d 3d 94 01 9a 01 98 01 |)' error|}=......|
+--------+-------------------------+-------------------------+--------+--------+